Help for this page
% perl -MO=Deparse,-p 481076.pl ... ((my $baz = $foo) or $bar); print($baz); 481076.pl syntax OK