izpolzvaj "Proc::ProcessTable" modula
ex. get a list of the process IDs and owners:
use Proc::ProcessTable;
$obj = new Proc::ProcessTable;
$proctable = $tobj->table();
for (@$proctable){
print $_->pid."\t". getpwuid($_->uid)."\n";
}
nadqvam se da svarshi rabota
Pozdravi,
Ivan Kolemanov
> Zdrawejte,
>
> Syzhalqwam, che wi prekyswam diskusiqta, no imam tuka edno wyprosche,
koeto
> ne e mnogo po temata, no wse pak shte go zadam. Ta w Perl mi trqbwa da si
> imam PPID-to na nqkoj (neka se smqta proizwolen) proces. Tyj kato getppid
> ne tyrpi whodni parametri, mozhe li da mi podskazhete kak naj-elegantno da
> si polucha towa PPID? Zhelatelno e da e samo s wyzmozhnostite na Perl -
> biblioteki i obekti. Izkluchwa se wyzmozhnostta za poluchawaneto mu chrez
> system i izpylnimi kawichki. PS bibliotekata pyk, koqto se downloadwa
> dopylnitelno neshto se dyni i ne wyrwi na wsichki unix-i, koito imamne.
>
> Predwaritelno blagodarq!
>
> Milen.
> ==================================================================
> A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers)
> Otpiswaneto RABOTI !!! : [EMAIL PROTECTED] UNSUBSCRIBE LUG-BG
> http://www.linux-bulgaria.org/ Hosted by Internet Group Ltd. - Stara
Zagora
>
>
==================================================================
A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers)
Otpiswaneto RABOTI !!! : [EMAIL PROTECTED] UNSUBSCRIBE LUG-BG
http://www.linux-bulgaria.org/ Hosted by Internet Group Ltd. - Stara Zagora
