Select Code to Download

#!/usr/bin/perl -w
my %hash;
...
print_bare;
print_sorted;
print_formatted;

print %hash with nothing else (no formatting):
 Ernie and Betty  do not care  Fred and Ethyl  cannot  Arnold and Jane
+t  might  Charlie and Alice  can
...

print %hash with other text:
%hash: 2/8