This is probably not The Right Way, but I had the thought the other day that one way to deal with this sort of problem is to run the child processes under fictitious names that include a label to identify the parent. So, for example, you might run httpd as "httpd_by_$$", then you could grep through the process list for "by_$$" to find pids you want to zap.

Note: if you're using the list form of exec or system, the first entry in the list is the name that appears in the process listing, as opposed to the actual name of the program you're launching. Here's a somewhat hacky proof-of-concept (single child case):

my $progname = 'emacs'; my $label = "_by_" . $$; my $proglabel = $progname . $label; my @args = ( $0 ); if ( my $pid = fork ) { # this is parent code # pause, then zap the child sleep 10; my @lines = grep{ m/$label/ } qx{ ps axw }; my @pids = map{ ( split " ", $_ )[0] } @lines; foreach my $pid ( @pids ) { my $status = kill 1, $pid; ($DEBUG) && print STDERR "Tried to kill (1) pid $pid, status: $sta +tus \n"; } } else { # this is child code die "cannot fork: $!" unless defined $pid; exec { $progname } ( $proglabel, @args ); }

In reply to Re: automatically killing all child processes created in a script by doom
in thread automatically killing all child processes created in a script by swartz

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.