Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
print "My cipher text is: $c\n";
my $nmessage = $rsa->decrypt( Ciphertext => $c, Key => $private, );
print "My plain text is: $nmessage\n";
  2. or download this
    ....
......
...
    my $cyphertext;
....
....
  3. or download this
    My Public key is: Crypt::RSA::Key::Public=HASH(0x8132390) $VAR1 = bles
+s( {
                 'e' => 65537,
...

After self error
Can't call method "encryptblock" on an undefined value at /usr/lib/per
+l5/site_perl/5.8.0/Crypt/RSA.pm line 98.