#! /pkg/gnu/bin/gawk -f
BEGIN {
  print "Content-type: text/html\n"

  print "<pre>"
  com = "ps"
  while (com | getline) {
    print $0
    if ($NF ~ /sim|neg/) {
      print "killing "$0
      system("kill -9 "$1)
    }
  }

  print "<a href=kill.cgi>kill all neg & sim processes</a>"

}