Select Code to Download

my $output_filename="OUTPUT.001";

...
    do_stuff($filename, $output_filename);
    ++$output;
}

for my $filename (@filelist) {
    my $output_filename = $filename . ".processed";
    do_stuff($filename, $output_filename);
}