print "$_\n" for grep /\bNOTICE\b/, grep tr/ // == 2, split / {2,}|\n/, $text;