Select Code to Download

#!/usr/local/bin/perl -w
 
...
 
   print Dumper ([\%hash]);
}

$VAR1 = [
          {
...
            'four' => 4
          }
        ];