Help for this page

Select Code to Download

Select or download this

my $ht = \%h1;
for my $key ( keys %{$ht} ){ 
    my $val = $ht->{$key};
    ...
}