Select Code to Download

while (<INPUT2>) {
    chomp;
...
        print RESULTS "$bioC\t$origins{$contig_id}\t$pip\n";
    }
}