Help for this page

Select Code to Download

Select or download this

my $temp;
while (($entry,$temp) = each %my_hash) {
...
    print $Hentry "\n";
  }
}