Re: Problems with RC5 (looks simple enough)
[email protected] (Matthias Bauer) Fri, 12 Jul 2002 17:52:24 +0200
| Newsgroups | perl.crypto |
|---|---|
| Message-ID | <[email protected]> |
Hi,
seems to be a problem with Crypt::RC5, not your code.
I just added the following lines to Crypt-RC5-1.01/test.pl:
-----
$rc5 = new Crypt::RC5 ('123456789012345678901234567890', 12);
$enc = $rc5->encrypt("blah1234");
$dec = $rc5->decrypt($enc);
if ($dec eq "blah1234") {
print "ok 2\n";
} else {
print "not ok 2\n";
}
-----
and 'make clean; perl Makefile.PL; make; make test' produces:
1..1
ok 1
not ok 2
Best regards,
Matthias