my @sortedkeys = sort { $hash{$a}->{this} cmp $hash{$b}->{this} } keys
+ %hash
[download]

Update: Oh, my mistake... I see that @sortedkeys is the array for the foreach loop. So you are doing fine, although for fun we should try to come up with a bunch of methods and then benchmark them.