plan9fox/rc/bin/broke

#!/bin/rc
rfork e
if(~ $#* 1){
	user=$1
}
ps | sed -n '/^'$user' .* Broken/s%[^ ]*  *%~>/proc/%
s%  *.* (.*)%/ctl # \1%
s%~%echo kill%p'
Import sources from 2011-03-30 iso image - rc 2011-03-30 14:14:36 +00:00			`#!/bin/rc`
kill, slay, broke: dont pollute environment, use $user 2020-12-23 00:43:29 +00:00			`rfork e`
Import sources from 2011-03-30 iso image - rc 2011-03-30 14:14:36 +00:00			`if(~ $#* 1){`
kill, slay, broke: dont pollute environment, use $user 2020-12-23 00:43:29 +00:00			`user=$1`
Import sources from 2011-03-30 iso image - rc 2011-03-30 14:14:36 +00:00			`}`
kill, slay, broke: dont pollute environment, use $user 2020-12-23 00:43:29 +00:00			`ps \| sed -n '/^'$user' .* Broken/s%[^ ]* *%~>/proc/%`
Import sources from 2011-03-30 iso image - rc 2011-03-30 14:14:36 +00:00			`s% . (.*)%/ctl # \1%`
			`s%~%echo kill%p'`