Penguin 2.99 P3.0 checksum untitled program mapthecat Transparent %%%delimiter%%% #!/usr/bin/perl foreach $i (1..10) { print("$i bottle of beer(s) on the wall...\n"); } $j = reverse "!nur yllufsseccus sah margorp niugnep rehtona tsuj"; print $j, "\n"; return $j; %%%delimiter%%%