$foo = "3";
$bar = 4 + $foo;

##</code><code>##

my $pattern = "foo|bar";
say "Match" if $str =~ $pattern;