sub foo { ...; bar() }

##</code><code>##

sub { ...; if ($_[0]) { $foo } else { @bar } }