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.