As others have said, you should use a module if you can. However, if you can't, you might be able to use the unix 'md5sum' command - it's available at least on my RH6.2 box. If you do have that command, then something like this would work:
#!/usr/bin/perl -w use strict; my $md5; while (<>) { chomp; $md5 = `echo $_ | md5sum`; $md5 =~ s/ .*//; print "$_ -> $md5"; }
-- Dan
In reply to Re: MD5 password encryption on a no frills script
by zigdon
in thread MD5 password encryption on a no frills script
by Coplan
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |