Hash keys are strings, but you're comparing them as numbers. Ordinarily, perl would automatically convert to numbers since they're being used in numeric context, but they're too big. So you need to do both of the following:

1. use bigint;
2. force the strings to numbers by (e.g.) adding to zero. For example:

sort { (0+$a) <=> (0+$b) }
[download]