确定数组是否包含某个值

作者：Fyodor Sizov

描述

这里有什么有趣的地方？

  • 使用 "eq" 运算符和 any(@array)

  • eq any(@arr) 可以用于字符串和整数

源代码： array-contains-a-value.pl

use v6;

my @arr = <the quick brown fox 5 2 9>;
say 'fox' eq any(@arr) ?? 'YES' !! 'NO'; # YES
say 'dog' eq any(@arr) ?? 'YES' !! 'NO'; # NO
say 3 eq any(@arr) ?? 'YES' !! 'NO'; # NO
say 2 eq any(@arr) ?? 'YES' !! 'NO'; # YES

# Local Variables:
# mode: perl6
# indent-tabs-mode: nil
# perl6-indent-offset: 4
# End: