for my $textfile (@textfiles) { if (grep) { output_this_result; } else { output_that_result; } } #### for my $textfile (@textfiles) { if (grep) { push @results, $textfile; } } do_something_with(@results);