[no subject]

  $SIG{'HUP'} = sub {
    _print "Recevied SIGHUP! Restarting.\n";

    # Kill all the children
    my @goners = ();
    foreach my $ref (keys %GordonKapes) {
      push @goners, $GordonKapes{$ref}{'PID'};
    }

    $TERMINATION = 1;
    kill 9, @goners;

    my $pid = fork();
    exit 0 if $pid;

    # Allow things to settle down;
    sleep(1);

    exec ("/opt/SAM/gk/gkd.pl") or die "$!\n";

  };

Thanks, 
Chris



</pre>
<!--X-Body-of-Message-End-->
<!--X-MsgBody-End-->
<!--X-Follow-Ups-->
<hr>
<ul><li><strong>Follow-Ups</strong>:
<ul>
<li><strong><a name="00960" href="msg00960.html">[ale] $SIG{'HUP'}</a></strong>
<ul><li><em>From:</em> cfowler at outpostsentinel.com (Christopher Fowler)</li></ul></li>
</ul></li></ul>
<!--X-Follow-Ups-End-->
<!--X-References-->
<!--X-References-End-->
<!--X-BotPNI-->
<ul>
<li>Prev by Date:
<strong><a href="msg00953.html">[ale] Need Tractor Feed Dot Matrix printer</a></strong>
</li>
<li>Next by Date:
<strong><a href="msg00955.html">[ale] javascript  Virus</a></strong>
</li>
<li>Previous by thread:
<strong><a href="msg01013.html">[ale] Need Tractor Feed Dot Matrix printer</a></strong>
</li>
<li>Next by thread:
<strong><a href="msg00960.html">[ale] $SIG{'HUP'}</a></strong>
</li>
<li>Index(es):
<ul>
<li><a href="maillist.html#00954"><strong>Date</strong></a></li>
<li><a href="threads.html#00954"><strong>Thread</strong></a></li>
</ul>
</li>
</ul>

<!--X-BotPNI-End-->
<!--X-User-Footer-->
<!--X-User-Footer-End-->
</body>
</html>