Help for this page

Select Code to Download


  1. or download this
    my %rhash = reverse %hash;
my %fh;
foreach my $num (keys %rhash)
  2. or download this
    my @keys = keys %{{ reverse %hash }};
my %fh;
foreach my $num ( @keys )