- Original Message -
From: "Jens Gassmann" <[EMAIL PROTECTED]>
did you use the http://www.atomix.de/Crypt-RIPEMD160-0.05.tar.gz? There i
patched like the bugreport described
http://rt.cpan.org/Public/Bug/Display.html?id=19138
I did now, same problem. It had randomly worked (worked as i
On Mon, Aug 25, 2008 at 4:35 PM, Jens Gassmann <[EMAIL PROTECTED]> wrote:
> The entire code is written in c :-( only some helper subs are written in
> perl. I could only write perl
You may be able to tell what it's trying to do by using tools like
strace. If not, I'd suggest you either conta
Hi Perrin,
You'll need to do some debugging on your code. The things that are
most likely to be different in a persistent environment like mod_perl
are environment variables, your current directory, the user you're
running as (file permission problems often show up this way), CHECK
and INIT bl
Hi Dondi,
RIPEMD160 is causing a segfault on my machine, on both versions of
mod_perl. It is segfaulting on the digest() function. It appears there
is something wrong the module?
did you use the http://www.atomix.de/Crypt-RIPEMD160-0.05.tar.gz? There
i patched like the bugreport described
- Original Message -
From: "Jens Gassmann" <[EMAIL PROTECTED]>
Hi,
we need RIPEMD160-Hashes for our mod_perl-app. The testscript attached
worked on commandline, but not with mod_perl. There it returns a wrong
Hash => 0123456789abcdeffedcba9876543210f0e1d2c3
Whats wrong? Where could i ge
On Fri, Aug 22, 2008 at 6:25 PM, Jens Gassmann <[EMAIL PROTECTED]> wrote:
> we need RIPEMD160-Hashes for our mod_perl-app. The testscript attached
> worked on commandline, but not with mod_perl. There it returns a wrong Hash
> => 0123456789abcdeffedcba9876543210f0e1d2c3
>
> Whats wrong? Where could
Hi Jim,
# Always do these
use strict;
use warnings;
use Crypt::RIPEMD160;
sorry - the example code was too quick and short - i always use strict
and warnings. But with strict and warnings the calculated hash is wrong
too. :-)
Regards,
Jens
Start with this:
#!/usr/bin/perl
#
# Always do these
use strict;
use warnings;
use Crypt::RIPEMD160;
my $ripemd160 = new Crypt::RIPEMD160;
$ripemd160->add('a');
my $digest = $ripemd160->digest();
print "Content-Type: text/plain\n\n";
print("Digest is " . unpack("H*", $digest) . "\n"