my @test_array = ( 3,6,,7,6,3,10,5,6,2,10 );
my @sorted = sort { $a <=> $b } grep /\d/, @test_array;
print "Min: $sorted[0]", $/;
print "Max: $sorted[-1]", $/;