Select Code to Download

hash->{KEY1}=VALUE1
hash->{KEY2}=VALUE2
hash->{KEY3}->{SUBKEY1}=VALUE3
hash->{KEY3}->{SUBKEY2}=VALUE4
hash->{KEY4}=VALUE5

my @keys=keys(%{$hash});
my $junk;
...
    }
  } 
}