How does it compare speed-wise with List::Util::any? I've always found that fast enough for my needs but maybe I'm just not very demanding.

"How does it compare speed-wise ..."

A very quick benchmark shows no appreciable difference.

#!/usr/bin/env perl

use strict;
use warnings;

use Array::Contains;
use List::Util 'any';
use Benchmark 'cmpthese';

my @base = 'A' .. 'Z';
my @search = map +($_, lc), @base;

print "\@base[@base]\n";
print "\@search[@search]\n";

cmpthese 0 => {
    lua => \&lua,
    acc => \&acc,
};

sub lua {
    for my $x (@search) {
        my $bool = any { $_ eq $x } @base;
    }

    return;
}

sub acc {
    for my $x (@search) {
        my $bool = contains($x, \@base);
    }

    return;
}
[download]

The check on the arrays was the same on each run:

@base[A B C ... X Y Z]
@search[A a B b C c ... X x Y y Z z]
[download]

Here's the results of three runs:

       Rate lua acc
lua 15544/s  -- -1%
acc 15622/s  1%  --

       Rate acc lua
acc 15777/s  -- -1%
lua 15905/s  1%  --

       Rate acc lua
acc 15782/s  -- -0%
lua 15857/s  0%  --
[download]

— Ken

Interesting. With perl 5.26.1 and List::Util 1.4602, I'm getting

       Rate  acc  lua
acc  6474/s   -- -48%
lua 12361/s  91%   --
[download]

and even more if I use a longer list

my @base = ('A' .. 'Z') x 100;
[download]

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]