if ($some_condition) {
  ($foo) = ($bar =~ m/capturing_pattern/);
else {
  ($foo = $bar) =~ s/pattern/replacement/;
}