foreach (<LOG>) {
  if ($_ =~/CRITICAL/) {
  print $_;
}

##</code><code>##

foreach (<LOG>) {
  if (/CRITICAL/) {
    print;
  }
}