Select Code to Download

#!/usr/bin/perl

...
my $plaintext  = $cipher->decrypt_hex($ciphertext);

print "$ciphertext\n$plaintext\n";

$ perl t.pl
53616c7465645f5f27aad01783d47f045a963683bb06e3aa959fc83d7c94e1f5aad894
+d37c8df0d93abaaa80fb9e073b9555761f85204457
...
$ perl t.pl
53616c7465645f5fda138a9a74e5c8c3081430fd3b895de307c1c303fbf48afa2d12bd
+8c7097d2a3d600819f4c46fb16702536e97d27211c
This data is hush hush blah blah