Select Code to Download

#!/usr/bin/perl -w
use strict;
...
"$fum" && 0;
"$foo" && 0;
print "$fum $foo\n";

#!/usr/bin/perl -w
use strict;
...
my $f_foo = defined $foo ? $foo : '';
my $f_fum = defined $fum ? $fum : '';
print "$f_fum $f_foo\n";