Автор Vitaly576 задал вопрос в разделе Программное обеспечение
Зашифровать в MD5 и получил лучший ответ
Ответ от Ёаня Санькин[гуру]
php тебе в помощь
только это будет не шифрование а хеширование
Ну вот так вроде фунциклирует, если я все правильно понял in.txt - файл с паролями out.txt - файл с хешами
<?php
$h_in = fopen('in.txt', 'r');
$h_out = fopen('out.txt', 'w');
while (!feof ($h_in)) {
fputs($h_out, md5(trim(fgets($h_in))."
");
}
fclose($h_in);
fclose($h_out);
?>James Lukash
Мудрец
(12919)
Весь код уже расписан. С чем помогать-то?
Ответ от James Lukash[гуру]
perl вам в помощь =)
#!/usr/bin/perl
use strict;
use warnings;
use Digest::MD5 qw (md5_hex);
die "wrong param count
" unless scalar @ARGV == 2;
my ($F, $G, $str);
open $F, '<', $ARGV[0] or die "open() error: $!
";
open $G, '>', $ARGV[1] or die "open() error: $!
";
while (<$F>) {
($str = $_) =~ s/[
s]//g;
print $G Digest::MD5->md5_hex ($str), "
";
}
close $G;
close $F;
perl вам в помощь =)
#!/usr/bin/perl
use strict;
use warnings;
use Digest::MD5 qw (md5_hex);
die "wrong param count
" unless scalar @ARGV == 2;
my ($F, $G, $str);
open $F, '<', $ARGV[0] or die "open() error: $!
";
open $G, '>', $ARGV[1] or die "open() error: $!
";
while (<$F>) {
($str = $_) =~ s/[
s]//g;
print $G Digest::MD5->md5_hex ($str), "
";
}
close $G;
close $F;
Ответ от 22 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Зашифровать в MD5