my @sorted = ikeysort { no warnings; int $_ } @data;