Select Code to Download

foreach (sort keys %$hash_ref) { print; }

$foo = \$bar;
print $$foo;
...

$foo = \%bar;
print for sort keys %$bar;