Select Code to Download

>perl -wMstrict -le
"my %words = map { $_ => 1 } qw($Word $name);
...
 print $line;
"
$Word  dollar   dollar