Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

arhuman's scratchpad

by arhuman (Vicar)
on Jun 02, 2004 at 03:21 UTC ( [id://359092] : scratchpad . print w/replies, xml ) Need Help??

From 'perldoc Crypt::OpenPGP::Cipher'
use Crypt::OpenPGP::Cipher; my $cipher = Crypt::OpenPGP::Cipher->new($name); my $ct = $cipher->encrypt($plaintext); my $pt = $cipher->decrypt($ct);

Valid cipher names ($name) are: IDEA, DES3, Blowfish, Rijndael, Rijndael192, Rijndael256, and Twofish.