!grep abs( $array[ $_ ] ) < abs( $array[ $_ + 1 ] ), ( 0..$#array-1 );