my $foo = ($bar + 1)/2;

##</code><code>##

print map( {baz $_} @quux), ' results.', $/;