my $regexp = /something_here/;
  do_stuff() unless $foo =~ $regexp;