in reply to sorting hashes
for my $k2 (sort {$a <=> $b } keys %{$rHash->{$k1}}) [download]
Alberto Simões