From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

use strict;
use Ryu;
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;