Select Code to Download

D:\Users\lanx>perl -MO=Deparse,-p -e"sub {return 1 and 0 }"
sub {
...
}
;
-e syntax OK

D:\Users\lanx>perl -MO=Deparse,-p,-x10 -e"sub {return 1 and 0 }"sub { 
+                                                                     
+  ((return 1) and 0);                                                
+  }                                                                  
+      ;

D:\Users\lanx>perl -MO=Deparse,-p -e"sub { return 1 and 0 }"
sub {
    ((return 1) and 0);
}
;
-e syntax OK