grep( /\G(?!(?s:.*?)$re)/, @array )