4 lines
106 B
Perl
4 lines
106 B
Perl
|
|
use Digest::MD5 qw(md5_hex);
|
||
|
|
|
||
|
|
print md5_hex("The quick brown fox jumped over the lazy dog's back"), "\n";
|