Don't lexicalize them with my $a or my $b if you want to be able to us
+e them in the sort() comparison block or function.
[download]

$ perl -we '
   local $a = 1;
   @h = sort {$a <=> $b} keys %hash;
   print "@h\n";> %hash = map { $_ , undef } 0 .. 3;
   @h = sort {$a <=> $b} keys %hash;
   print "@h\n";
'
0 1 2 3
[download]