Just a small note, sort is lexical sort. While it doesn't matter in this case (every number has this same length), you probably meant sort { $a <=> $b }.