Help for this page

Select Code to Download


  1. or download this
    encrypt: datasize not multiple of blocksize (16 bytes) at /usr/local/l
+ib/perl5/site_perl/5.8.3/Crypt/OpenPGP/CFB.pm line 59.
  2. or download this
    #!/usr/local/bin/perl -w

...

  print "plain text:\n" . $plaintext . "\n";
  3. or download this
      my $pgp = Crypt::OpenPGP->new (
       "PubRing" => $PubRing
...
  die "Encryption failed: ", $pgp->errstr unless $ciphertext;
    
  return $ciphertext;