Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
"my %h = qw(foo oofzle  bar rabzle  quux xuuqzle  fee eefzle);
...
{ bar => "rabzle", fee => "eefzle", foo => "oofzle", quux => "xuuqzle"
+ }

{ bar => "rabDING", fee => "eefzle", foo => "oofDING", quux => "xuuqzl
+e" }