my @array1=(1,33,45,66);
my @newarray = sort { $a <=> $b } ( @array1 ) x 2;