my $code = Crypt::LewisCarrollCode->new('This is a pass phrase'); my $encrypted = $code->encrypt("You will never decipher this!"); my $decrypted = $code->decrypt($encrypted);