Select Code to Download

#!/usr/bin/perl -w

...
croak $gpg->error() if $gpg->error();

print $enc;

gpg --encrypt --recipient bob@dot.com

-----BEGIN PGP MESSAGE-----
Comment: For info see http://www.gnupg.org
...
QnM+Zs1Rug+v6lYBCpN7
=Rjs4
-----END PGP MESSAGE-----

#!/usr/bin/perl -w

...
croak $gpg->error() if $gpg->error();

print $dec;

Can you read this