Help for this page

Select Code to Download


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