NAME

fork::hook - implements functions that called after fork, in child process.

fork::hook - отпределяет функции, которые будут вызваны после форка в дочерних процессах.

SYNOPSIS

  package Test;

  sub AFTER_FORK { warn "Hello World!" }  # <<< Function executed after call 'fork'

  package main;
  use fork::hook;
  fork;

or

  package Test;

  sub AFTER_FORK_OBJ { warn "Hello World! " . shift }; # <<< Function executed after call 'fork', for each object

  package main;
  use fork::hook;
  my $a = bless {}, 'Test';
  fork;

DESCRIPTION

fork::hook replace origin PL_ppaddr[OP_FORK] on my own fork handler. In 'handler', i iterate over perl arena, and call AFTER_FORK for packages stash, or AFTER_FORK_OBJ blessed ref.

AUTHOR

Evgeniy Vansevich, <hammer@cpan.org>

COPYRIGHT AND LICENSE

Copyright (C) 2016 by Evgeniy Vnasevich