gpt4 book ai didi

perl - 我如何检查 Perl 中的值是否为 undef?

转载 作者:行者123 更新时间:2023-12-01 00:14:06 24 4
gpt4 key购买 nike

最好举个例子:

my $var1=1;
my $var2;
my $var3=3;

# say "at least one undef" if at least one of $var1, $var2, $var3 is undef

显然我可以明确地循环并执行此操作,但我总是喜欢找到一个可以达到相同结果的衬垫。

最佳答案

if (grep { !defined } $var1, $var2, $var3) {
say 'at least one undef'
}

一条线

say 'at least one undef' if grep { !defined } $var1, $var2, $var3;

关于perl - 我如何检查 Perl 中的值是否为 undef?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/3767202/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com