#!/usr/bin/perl -w

open PH, "ps -ef|" or die;
close PH;