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

##</code><code>##

my @sorted = sort { no warnings; $a <=> $b } @data;

##</code><code>##

my @sorted;
{
  no warnings;
  @sorted = sort { $a <=> $b } @data;
}