Select Code to Download

open FILE_LIST, "list.txt";
while(<FILE_LIST>) {
 #read each line into the array here -- gotta look up the syntax
}
close FILE_LIST;

foreach $filename (@files2change) {
 my $backup = $filename . '.bak';
...
 close OLD_FILE;
 close NEW_FILE;
}