shithub: rc

ref: 047477cdd9442f930aba6bcf7f19b92f2b58a8db
dir: rc/fpl

View raw version 
#!/bin/rc
ps -n | awk '
/ play$/ { g[++i] = $3 }
{ for(n=1; n<=i; n++) if(g[n] == $3) p[n] = $2 }
END { for(n=1; n<=i; n++) print p[n] }
'