view release on metacpan or  search on metacpan

lib/Flux/Simple.pm  view on Meta::CPAN

sub array_in {
    my ($arrayref) = @_;
    return Flux::Simple::ArrayIn->new($arrayref);
}

sub array_out {
    my ($arrayref) = @_;
    return Flux::Simple::ArrayOut->new($arrayref);
}

sub mapper(&;&) {
    my ($cb, $commit_cb) = @_;

    my @args = (cb => $cb);
    push @args, commit_cb => $commit_cb if defined $commit_cb;
    return Flux::Mapper::Anon->new(@args);
}


1;