my $allcool = 0; # start false foreach my $psaxline (@psax_list) { $allcool++ if ($psaxline =~ /$process/); } unless ($allcool) { print "$process does not appear to be running!\n"; }