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"; } #### print "$process does not appear to be running!\n" unless grep /$process/, @psax_list;