use Crypt::RC4; my $enc_pw = RC4(seekrit => 'johnr'); my $dec_pw = RC4(seekrit => $enc_pw); print 'enc_pw = ', unpack( 'H*' => $enc_pw ), "\n"; print 'dec_pw = ', $dec_pw, "\n"; __output__ enc_pw = 344eedff3d dec_pw = johnr
_________
broquaint
In reply to Re: MD5 encrypted password
by broquaint
in thread MD5 encrypted password
by shilpam
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |