Help for this page
Select Code to Download
Select
or
download this
my @in = qw/ test ... } print "$_\n" for keys %out;