3. 类 C 的 for 循环
4. 针对列表 (数组) 每个元素的 foreach 循环
for ($count=1; $count <= 5; $count++)
{
#statements inside the loop go here
}
注:
foreach localvar (listexpr)
{
statement_block;
}
(1) 此处的循环变量 localvar 是个局部变量, 如果在此之前它已有值, 则循环后仍恢复该值.
(2) 在循环中改变局部变量, 相应的数组变量也会改变.
例:
此外, 如果 localvar 省略了的话, PERL 将使用默认变量 $_.
foreach $word (@words)
{
if ($word eq"the")
{
print ("found the word'the'\n");
}
}
例:
$_是 PERL 最常使用的默认变量, 上例中 print 后面的 $_也可以去掉, 当 print 没有参数时, 会默认输出 $_变量.
@array = (123, 456, 789);
foreach (@array)
{
print $_;
}
5.do 循环
do 循环至少执行一次循环.
do
{
statement_block
} while_or_until(condexpr);
6. 循环控制
退出循环为 last, 与 C 中的 break 作用相同;
执行下一个循环为 next, 与 C 中的 continue 作用相同;
PERL 特有的一个命令是 redo, 其含义是重复此次循环, 即循环变量不变, 回到循环起始点. 但要注意, redo 命令在 do 循环中不起作用.
三. 单行条件
语法为 statement keyword condexpr. 其中 keyword 可为 if, unless, while 或 until. 例如:
虽然条件判断写在后面,但却是先执行的.
print ("This is zero.\n") if ($var == 0);
print ("This is zero.\n") unless ($var != 0);
print ("Not zero yet.\n") while ($var--> 0);
print ("Not zero yet.\n") until ($var-- == 0);
来源: http://www.bubuko.com/infodetail-2460940.html