Help for this page

Select Code to Download


  1. or download this
    use strict;

...

print "$_ => $x{$_}\n" for keys %x;