Select Code to Download

while(my $line = <>) { 
    do_something($line);
}

if (($zero=0)) {
    do_something($zero); # never
...
while (my $empty='') {
    do_something($empty); # never
}