Help for this page

Select Code to Download


  1. or download this
    $ perl -Mstrict -wE'sub foo{} sub bar{return foo() or die "died"} bar(
    +)'
    
    Possible precedence issue with control flow operator at -e line 1.
    
  2. or download this
    $ perl -Mstrict -wE'sub foo{} sub bar{return foo() || die "died"} bar(
    +)'
    
    died at -e line 1.
    
  3. or download this
    $ perl -Mstrict -wE'sub foo{} sub bar{return (foo() or die "died")} ba
    +r()'
    
    died at -e line 1.