my $output_filename="OUTPUT.001"; for my $filename (@filelist) { do_stuff($filename, $output_filename); ++$output; } #### for my $filename (@filelist) { my $output_filename = $filename . ".processed"; do_stuff($filename, $output_filename); }