ref: c02306479fb810515b4905e6df7ad2f74b8e7173
dir: purgatorio/dis/broke
#!/dis/sh.dis
load std
if {~ $#* 1} {U=$1} {U=`{cat /dev/user}}
ps | sed -n -e '/^[ ]*[0-9]+[ ]+[0-9]+[ ]+'$U'.*broken/s%^[ ]*([0-9]+)[ ]+.*([^ ]+)$%echo kill>/prog/\1/ctl # &%p'