@array = sort { $a <=> $b } @array, $k;