Help for this page

Select Code to Download


  1. or download this
      # use \Q and \E
      $process = qr/\s+(?:\d+[:])+?\d+\s+.*?\Q$ARGV[0]\E.*?\s*$/;
      # or enclose in an eval
      eval { $process = qr/\s+(?:\d+[:])+?\d+\s+.*?$ARGV[0].*?\s*$/; };
      if($@) { ... }