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

LNATION / Data-LnArray-XS-0.09 / t / 19-lastIndexOf.t 

            

              
1
2
3
4
5
6
7
8
9
10
11

              
use Test::More;
use Data::LnArray::XS;
my $array = Data::LnArray::XS->new(qw/one two one three four/);
my $first = $array->lastIndexOf('one');
is($first, 2);
done_testing;