view release on metacpan or  search on metacpan

lib/Parallel/WorkUnit/Procedural.pm  view on Meta::CPAN

my $wu = Parallel::WorkUnit->new();

sub WorkUnit() {
    $wu = Parallel::WorkUnit->new() if !defined($wu);
    return $wu;
}


sub async(&;&) { return WorkUnit->async(@_) }


sub asyncs { return WorkUnit->asyncs(@_) }


sub waitall() { return WorkUnit->waitall() }


sub waitone { return WorkUnit->waitone(@_) }

lib/Parallel/WorkUnit/Procedural.pm  view on Meta::CPAN

sub proc_count() { return WorkUnit->count() }


sub queue { return WorkUnit->queue(@_) }


sub queueall { return WorkUnit->queueall(@_) }


sub start(&) { return WorkUnit->start(@_) }

1;

__END__

=pod

=encoding UTF-8

=head1 NAME