open(PS_F, "ps -f|");

while (<PS_F>) {
  ($uid,$pid,$ppid,$restOfLine) = split;
  # do whatever I want with the variables here ...
}

close(PS_F);