Perl - 如果在foreach循环中跳过秒

Question

如果我在Perl循环中有2个if循环，如果我的脚本进入我的第一个if，如何跳过第二个if？

实施例：

my $var1 = 1; 
my $var2 = 1; 

for my $item ('...') { 
    if ($var1 == 1) { 
     print "First IF \n"; 
    } 
    if ($var2 == 1) { 
     print "Second IF (I don't want this to be printed if the first if is true)\n"; 
    } 
} 

Answer 1

随着elsif：

if (pred1) { 
    ... 
} elsif (pred2) { 
    ... 
} 

谓词2和嵌段[NB：不 “环”]与关联谓词如果1的计算结果为它不会被认为是true。

Answer 2

一种解决方法是设置逻辑，以便只有在测试1为假时才检查测试2。

foreach my $item (@items) { 
    if (test1) { 
    ... 
    elsif (test2) { 
    ... 
    } 
} 

但另一种选择是使用next直接跳到你的循环的下一次迭代。

foreach my $item (@items) { 
    if (test1) { 
    ... 
    next; 
    } 
    if (test2) { 
    ... 
    } 
}