Select Code to Download

$pgp = new Crypt::OpenPGP( SecRing => $private_file );
my $plaintext = $pgp->decrypt (
...
                               Passphrase => $pass,
                              ) || die $pgp->errstr();