Select Code to Download

use strict;
use warnings;
...
    open LOG, ">$file2";
    print LOG @file;
    close LOG;

package FileNamePrep;

...
}

1;