ref: d0e00e433f5778d3d08cc8c7bf6fda4737864bb2 dir: /bin/fpl/
#!/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] } '