Help for this page
Select Code to Download
Select
or
download this
$ perl -Mstrict -Mwarnings -E ' > my %x = (a => 1); ... 0 a1 a 1