Select Code to Download

substr outside of string at ReturnA/ReturnAReplacer.pl line 90, <IN> l
+ine 8453.

foreach $file (@infile){
    open(IN, '<', "$file") or warn $! and next;
...
            }
                
}