From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more
|
my $first = Ryu::Source->new;
my @actual ;
$first ->skip(2)-> each ( sub {
push @actual , $_ ;
});
$first ->emit( $_ ) for 1..5;
cmp_deeply(\ @actual , [ 3..5 ], 'skip operation was performed' );
done_testing;
|