foreach my $file (@FILES) { my $newFile = $curDir."/".$file; my $curFile = $newDir."/".$file;