The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

SYNOPSIS

 $0 proc.num
      proc.num name    [=~]foo [<>=]5 ...
      proc.num cmdline  =foo   '>1' '<4'
      proc.num exe      ~foo   '>1'

      proc.time name =foo '>180'
 
    http.check
      http.check [get|post] http://127.0.0.1/stat code 200 300
      http.check [get|post] http://127.0.0.1/stat grep ok health

    net.port.listen
      net.port.listen tcp 80 22
      net.port.listen udp 53

      --debug