Flow::Join - Assemble multiple flows streams in to one
my ( $s, $s1 );
my $f1 = Flow::create_flow(
Splice => 200,
Join => {
Data => Flow::create_flow(
sub {
return [ grep { $_ > 10 } @_ ];
},
Splice => 10
),
Min => Flow::create_flow(
sub {
return [ grep { $_ == 1 } @_ ];
},
Splice => 40,
)
},
ToXML => \$s,
);
$f1->run( 1, 3, 11 );
Join => [
Data => Flow::create_flow(
sub {
return [ grep { $_ > 10 } @_ ];
},
Splice => 10
),
Min => Flow::create_flow(
sub {
return [ grep { $_ == 1 } @_ ];
},
Splice => 40,
)
],
Flow::Join - Assemble multiple flows streams in to one
Zahatski Aliaksandr, <zag@cpan.org>
Copyright (C) 2015 by Zahatski Aliaksandr
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.
