Arrays как в Perl проверить, является ли число элементом массива 2B7