um jeito simples de testar é rodar (em Linux/Unix) o comando:<br><br>$ echo 'texto-inicial' |md5sum<br>5e08602128f3f642da84abb1dfbf1360 -<br><br>Cheers,<br>Russo<br><br><div class="gmail_quote">2010/1/30 Ricardo Stock <span dir="ltr"><<a href="mailto:ricardostock@bol.com.br">ricardostock@bol.com.br</a>></span><br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Ola Para todos da lista.<br>
<br>
Estou tentando aprender a usar o MD5, no CPAN encontrei os modulos<br>
<br>
Digest::MD5 e<br>
Digest::MD5::Reverse onde os mesmos estão instalados<br>
<br>
Fiz um código para tentar aprender, segue o techo<br>
<br>
está é a função que recebe o texto e o criptografa<br>
#######################################################<br>
my $fonte=param('fonte');<br>
my $md5=Digest::MD5->new;<br>
$md5->add($fonte);<br>
<br>
print "$fonte criptografado usando MD5 <p>\n";<br>
<br>
print "Em base64<br>\n";<br>
print $md5->b64digest,"<p>";<br>
<br>
print "Em Hexadecimal<br>";<br>
$fonte=$md5->hexdigest;<br>
print "$fonte<p>\n";<br>
###########################################################<br>
Até aqui não ha warnings ou erros, e executa normalmente. mas não consigo<br>
descriptografar o texto, me apresentando um erro neste techo<br>
<br>
<br>
print "Texto Original<br>\n";<br>
my $plaintext=reverse_md5($md5); <-- Nesta linha ---- Undefined<br>
subroutine &main::reverse_md5 called<br>
print "$plaintext";<br>
<br>
<br>
Não consegui achar nada no google que tirasse minha dúvida. Também nao<br>
entendi bem o que é uma operação destruitva no metodo.<br>
Outra coisa, como saber se meu hash está correto ?<br>
<br>
Este foi o retorno quando o valor da variavel $fonte era ricardo<br>
Em base64<br>
ZyByAFTp0k+/bCCoMf8ofg<br>
<br>
Em Hexadecimal<br>
d41d8cd98f00b204e9800998ecf8427e<br>
<br>
<br>
<br>
Fico no aguardo de qualquer ajuda.<br>
<br>
Obrigado<br>
<br>
Ricardo Stock<br>
<a href="mailto:ricardostock@bol.com.br" target="_blank">ricardostock@bol.com.br</a><br>
<br>
_______________________________________________<br>
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org" target="_blank">Cascavel-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
</blockquote></div><br><br clear="all"><br>-- <br>Alexei Znamensky [russoz_gmail_com] [<a href="http://russoz.wordpress.com">russoz.wordpress.com</a>] [<a href="http://www.flickr.com/photos/alexeiz">www.flickr.com/photos/alexeiz</a>]<br>
"Though we live in trying times, we're the ones who have to try"<br>