Digest::MD5 aus Java (gelöst) - #160459 (Allgemeines zu Perl)

maart

2012-08-01 19:16

User since
2012-08-01
11 Artikel
BenutzerIn
[default_avatar]

Hallo Raubtier,

Danke für deine Antwort!

Ich habe es jetzt so gemacht:

Code (perl): (dl )

my $md5 = Digest::MD5->new;
$md5->add("hallo@fehl");
$md5->add("1112");
my $xx = $md5->digest;

Allerdings hätte ich jetzt noch gern ein byte-Array. So habe ich es zum Testen versucht:

Code (perl): (dl )

my $rt = join('-',unpack('U*',$xx));

Java:
rt[0] = 18
rt[1] = -29
rt[2] = -38
...

Perl:
rt[0] = 18
rt[1] = 227
rt[2] = 218
...

Aber hier stimmen einige Arraywerte nicht. Kann mir hier jemand helfen?

Danke.
maart