foreach (@files) {

##</code><code>##

foreach my $file (@files) {

##</code><code>##

    $outputfile = "STEP2_" . $_;
    open(OUTFILE, ">" , $outputfile) or die $!;     

##</code><code>##

    $outputfile = "STEP2_" . $file;
    open(OUTFILE, ">" , $outputfile) or die "opening $outputfile $!";