sub get_procs { # we don't consider root-owned processes either. return split(/\n/, `$ps | sed 's/^ *//'`); }