## 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