Select Code to Download

% perl -wle '1 unless 2 or (3 and 4) if (5 and 6)'
syntax error at -e line 1, near ") if"
Execution of -e aborted due to compilation errors.

bar() if $foo;

if ( $foo ) {
  bar();
}

bar() or baz() if $foo;

if ( $foo ) {
  unless ( bar() ) {
    baz();
  }
}