/ 
BGS-0.12
River stage zero No dependents
/ BGS

NAME

BGS - Background execution of subroutines in child processes.

SYNOPSIS

use BGS;
# $BGS::limit = 0;

my @foo;

foreach my $i (1 .. 2) {
  bgs_call {
    # child process
    return "Start $i";
  } bgs_back {
    # callback subroutine
    my $r = shift;
    push @foo, "End $i. Result: '$r'.\n";
  };
}

bgs_wait();

print foreach @foo;

MOTIVATION

The module was created when need to receive information from dozens of database servers in the shortest time appeared.

DESCRIPTION

bgs_call

Child process is created for each subroutine, that is prescribed with bgs_call, and it executes within this child process.

The subroutine must return either a scalar or a reference!

The answer of the subroutine passes to the callback subroutine as an argument. If a child process ended without bgs_call value returning, than bgs_back subprogram is called without argument.

bgs_call return vpid (virtual pid) of child process.

bgs_back

The callback subroutine is described in bgs_back block.

The answer of bgs_call subroutine passes to bgs_back subroutine as an argument.

bgs_wait

Call of bgs_wait() reduces to child processes answers wait and callback subroutines execution.

Call bgs_wait($vpid) to wait specific process.

bgs_break

kill all or specific child processes.

Call bgs_break($vpid) to kill specific process.

$BGS::limit

Set $BGS::limit to limit child processes count. Default is 0 (unlimited).

AUTHOR

Nick Kostyria

COPYRIGHT AND LICENSE

Copyright (C) 2011 by Nick Kostyria

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.