Hope it helps !

## loop through the TAB files###
foreach $file (@files) {
chomp;
# just add $file so for each $file , there is a $verifile created

$verifile = $file.$outbox.$yr.$mn.$day.$hr.$min.$sec."_FIXED.TAB";
open(OUTPUT_FILE, ">>$verifile")||die "Can't open file: $!";
#string manipulation will go here
close OUTPUT_FILE; 
}# end for each file
[download]