$x=1; unless( $x ) or warn 'Erk!';;
[syntax error at (eval 11) line 1, near ") or"