PARI:   ***   incorrect type in a transcendental function. at /opt/standard_perl/perl5881/lib/5.8.8/x86_64-linux/Math/pari.pm line 994.

##</code><code>##

$private_key = new Crypt::RSA::Key::Private;
$pkey = $private_key->read(Filename => $private_file);
$RSA_tmp = $RSA_object->sign(Message => $PI_string, Key => $pkey);

##</code><code>##

TEST = $VAR1 = bless( {
                 'Version' => '1.91',
                 'Cipher' => 'Blowfish'
               }, 'Crypt::RSA::Key::Private' );

HASH{_dq } => 0000000000000003
HASH{_d  } => 0000000000000003
HASH{_n  } => 0000000000000003
HASH{_q  } => 0000000000000003
HASH{_e  } => 0000000000000003
HASH{_p  } => 0000000000000003
HASH{_dp } => 0000000000000003

##</code><code>##

PARI:   ***   incorrect type in gfloor. at /opt/standard_perl/perl5881/lib/5.8.8/Crypt/primes.pm line 580.

##</code><code>##

#!/opt/standard_perl/perl5881/bin/perl -w

use Crypt::RSA;

my $keychain = new Crypt::RSA::Key;
my ($public, $private) = $keychain->generate ( 
                         Identity   => "test",
                          Size      => 1024,  
                          Verbosity => 1) or die $keychain->errstr();

$private->write( Filename => 'spi4500eb.private');
$public->write( Filename => 'spi4500eb.public');

##</code><code>##

use Digest::MD5;
use Crypt::RSA;
use Crypt::RSA::Key::Private;
use Crypt::RSA::Key::Public;
use Crypt::RSA::SS::PKCS1v15;