[oracle@PD sbin]$ cat t2.pl
for ($i=1;$i<=3;$i++){
$j=0;
print "\$i is $i\n";
while ($j<=7){
$j++;
if ("$j" == "5") { next;}
print "\$j is $j\n";
};
};
[oracle@PD sbin]$ perl t2.pl
$i is 1
$j is 1
$j is 2
$j is 3
$j is 4
$j is 6
$j is 7
$j is 8
$i is 2
$j is 1
$j is 2
$j is 3
$j is 4
$j is 6
$j is 7
$j is 8
$i is 3
$j is 1
$j is 2
$j is 3
$j is 4
$j is 6
$j is 7
$j is 8
本文章为转载内容，我们尊重原作者对文章享有的著作权。如有内容错误或侵权问题，欢迎原作者联系我们进行内容更正或删除文章。
