$string = "...foo\nbar...";
if ($string =~ /foo$bar/m) {
  # ...
}