Select Code to Download

if( !$cond1 && !$cond2 && !$cond3 ) { doit() )

doit() unless $cond1 or $cond2 or $cond3;

#! perl 
use strict;
...
c:3
d:4
e:5

#! perl -slw
use strict;
...
c:3
d:4
e:5