in reply to retrieving from a hash numerically

You already have your potential keys ordered - they're 0 .. 114: 
foreach (0 .. 114) {
   print "VALUE $hash{$_}\n" if exists $hash{$_}
}

[download]

Flavio
perl -ple'$_=reverse' <<<ti.xittelop@oivalf

Don't fool yourself.

In Section Seekers of Perl Wisdom