Select Code to Download

shift (sort ( @array ) );

@array = sort @array;
shift @array;

if (@$array[$_] == $number) {
    @$array[$_] = 0; 
    @array = (sort {$a <=> $b} (@$array));
    shift;
}