Help for this page
if ( not $code ) { $code = $unit; ... @ARGV = @$argv; }
if ( $A ) { if ( $B ) { ... {...} }; };
# Four-outcome tree my $cf = !!$code; ... $code = $unit . q{()}; } else { die 'Fifth element!' };