process managing in Perl

[Olivier Moulene]

I have the pid of one running process and i want to kill it and all its children.
What can i do to know the pids of every children ?