Dakenah Johnson wrote at Mon, 07 Jul 2003 10:11:37 +0000:
> I am writing a script that uses backquotes and the ps-ef command to print
> the UID and command for all currently running processes.
You can also use a module instead of reinventing the wheel :-)
Have a look to the CPAN module
Proc::ProcessTable, e.g.:
use Proc::ProcessTable;
my $processes = Proc::ProcessTable->new;
foreach (@{ $processes->table }) {
printf "Owner: %s, Command: %s\n", $_->uid, $_->cmndline;
}
Greetings,
Janek
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
