http://qs321.pair.com?node_id=873689


in reply to How to find out if X is an element in an array?

#!perl

use strict;
use warnings;

use List::MoreUtils qw{ any };

my @array = qw{ A B C D E X };

if (any { $_ eq 'X'} @array) {
    print 'YES';
}
else {
    print 'NO';
}

[download]

In Section Seekers of Perl Wisdom