Help for this page
open PS, 'ps -ef -o pid,ppid,pgid,user |' or die; while (<PS>) ... print; } close PS or die;
#!/bin/sh ps -ef -o pid,ppid,pgid,user | /usr/bin/perl -lape '$_="@F"'