Group
Extension

Matches 5

DataFlow ( R/RU/RUSSOZ/DataFlow-1.121830.tar.gz, RUSSOZ, 2012; MetaCPAN )
DataFlow/t/15-policy-scalar-only.t ( view source; MetaCPAN )
ocd = ( $uc->process($aref) )[0];
isnt( $aref_procd,      $aref, 'preserves non-strings' );
isnt( $aref_procd->[2], 'cc',  q{preserves references' properties} );
isnt( $aref_procd->[2], 'CC',
    q{do
DataFlow ( R/RU/RUSSOZ/DataFlow-1.121830.tar.gz, RUSSOZ, 2012; MetaCPAN )
DataFlow/t/15-policy-process-into.t ( view source; MetaCPAN )
ing' );

my $aref       = [qw/aa bb cc dd ee ff/];
my $aref_procd = ( $uc->process($aref) )[0];

#isnt( $aref_procd, $aref, 'preserves non-strings' );
is( $aref_procd->[2], 'CC', q{preserves reference
DataFlow ( R/RU/RUSSOZ/DataFlow-1.121830.tar.gz, RUSSOZ, 2012; MetaCPAN )
DataFlow/t/10-proc-wrapper.t ( view source; MetaCPAN )
r->new( wraps => 'UC' );
ok($wrapped);
my @res = $wrapped->process('abc');
is( scalar(@res), 1 );
isnt( $res[0], 'ABC' );
is( $res[0]->get_data('default'), 'ABC' );

# non-raw input tests
use DataFlow
DataFlow ( R/RU/RUSSOZ/DataFlow-1.121830.tar.gz, RUSSOZ, 2012; MetaCPAN )
DataFlow/t/05-proc.t ( view source; MetaCPAN )
, 'returns nothing for nothing' );
is( ( $uc->process('aaa') )[0], 'AAA', 'works as it should' );
isnt( ( $uc->process('bbb') )[0], 'bbb', 'indeed works as it should' );
is( ( $uc->process(1) )[0], 1,
DataFlow ( R/RU/RUSSOZ/DataFlow-1.121830.tar.gz, RUSSOZ, 2012; MetaCPAN )
DataFlow/t/01-dataflow.t ( view source; MetaCPAN )
 scalars
diag('scalar params');
ok( !defined( $f->process() ) );
is( $f->process('aaa'), 'AAA' );
isnt( $f->process('aaa'), 'aaa' );
is( $f->process(1), 1 );

# array
diag('array params');
my @allyour

Powered by Groonga
Maintained by Kenichi Ishigaki <ishigaki@cpan.org>. If you find anything, submit it on GitHub.