Select Code to Download

# plain hash note parens()
my %plain = (a=>1,b=>2);
...
foreach my $k ( keys %{$ref} )