Select Code to Download

#!/usr/bin/env perl -wl
use strict;
...
sub y { return "why" }
print y( $foo );
print x( $foo );

#!/usr/bin/env perl -lw
use strict;
...
print if( $foo );
print main->if( $foo );
print log( $foo );

Ambiguous call resolved as CORE::log(), qualify as such or use & at - 
+line 16.
Oops!
...
Oops!
if(1)
log(1)