NAME
List::Util::Find - List utilities related to finding items
VERSION
This document describes version 0.004 of List::Util::Find (from Perl
distribution List-Util-Find), released on 2023-09-16.
SYNOPSIS
use List::Util::Find qw(hasnum hasstr);
my @ary = (1,3,"foo",7,2,"bar",10,"baz");
if (hasnum 3, @ary) {
...
}
if (hasstr "baz", @ary) {
...
}
DESCRIPTION
Experimental.
FUNCTIONS
Not exported by default but exportable.
hasnum
Usage:
hasnum $num, ...
Like "grep { $_ == $num } ..." except: 1) it short-circuits (exits early
as soon as an item is found); 2) it makes sure "undef" does not match;
3) it makes sure non-numeric scalars don't match when $num is zero. It
is equivalent to something like:
use List::Util qw(first);
use Scalar::Util qw(looks_like_number);
defined(first { defined && looks_like_number($_) && $_ == $num } @list);
except it does not use any module.
hasstr
Usage:
hasstr $str, ...
Like "grep { $_ eq $num } ..." except: 1) it short-circuits (exits early
as soon as an item is found); 2) it makes sure "undef" does not match
empty string. It is equivalent to something like:
use List::Util qw(first);
defined(first { defined && $_ eq $str } @list);
except it does not use any module.
HOMEPAGE
Please visit the project's homepage at
<https://metacpan.org/release/List-Util-Find>.
SOURCE
Source repository is at
<https://github.com/perlancar/perl-List-Util-Find>.
SEE ALSO
List::Util
AUTHOR
perlancar <perlancar@cpan.org>
CONTRIBUTING
To contribute, you can send patches by email/via RT, or send pull
requests on GitHub.
Most of the time, you don't need to build the distribution yourself. You
can simply modify the code, then test via:
% prove -l
If you want to build the distribution (e.g. to try to install it locally
on your system), you can install Dist::Zilla,
Dist::Zilla::PluginBundle::Author::PERLANCAR,
Pod::Weaver::PluginBundle::Author::PERLANCAR, and sometimes one or two
other Dist::Zilla- and/or Pod::Weaver plugins. Any additional steps
required beyond that are considered a bug and can be reported to me.
COPYRIGHT AND LICENSE
This software is copyright (c) 2023, 2021 by perlancar
<perlancar@cpan.org>.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
BUGS
Please report any bugs or feature requests on the bugtracker website
<https://rt.cpan.org/Public/Dist/Display.html?Name=List-Util-Find>
When submitting a bug or request, please include a test-file or a patch
to an existing test-file that illustrates the bug or desired feature.