Select Code to Download

>perl -wMstrict -le
"sub H (&%) { my ($cr, %h) = @_;  $cr->(%h); }
...
Odd number of elements in hash assignment at -e line 1.
Use of uninitialized value $_[3] in print at -e line 1.
a1b