Select Code to Download

my @arr = @ARGV || (1, 4, 9, 16);
# || forces scalar context

my @args = ( 'p455w0rD', '5a1T' );
my $crypt = crypt( @args );
# crypt is prototyped as sub ($$) crypt;