Select Code to Download

# I have already read the 2-column table file into %table.
# I've also already opened INFILE and OUTFILE

...
    print OUTFILE $new_line;
}    
print "Made $replacecount replacements.\n";