Help for this page
if ($foo and /bar/) { print "Condition suceeds.\n"; ... s//baz/; # switch bar or bop with baz depending # on a bunch of things that have already happened. }