Select Code to Download

#!/usr/bin/perl

...
print CIPHERTEXT $ciphertext;
close(CIPHERTEXT);

#!/usr/bin/perl

...
print STDOUT "Server:   " . $server   . "\n";
print STDOUT "Username: " . $username . "\n";
print STDOUT "Password: " . $password . "\n";