@KEYS = sort { $a <=> $b } @KEYS;