Select Code to Download

#!perl -w
use strict;
...
};
$hashes[0]->{baz} = 1;
print Dumper $hashes[1]; # { foo => 'bar' }

<c>
#!perl -w
...
};
$hashes[0]->{baz} = 1;
print Dumper $hashes[1]; # { foo => 'bar', baz => 1 }