for my $file_in (@files) { rename $file_in, "$directory/$name"; $name++; }