my @array = qw( -25 -3 -10 -30 -1 -2 -1 -4 -23 );