Select Code to Download

if (%$href) { print "has elements" }

my @keys = keys %$href;
my @vals = values %$href;
while (my ($key, $val) = each %$href) { ... }

for (keys %$href) {
    $_ = "foo";
}