Perl 标签语句

最新推荐文章于 2020-07-20 15:27:03 发布

scan724

最新推荐文章于 2020-07-20 15:27:03 发布

阅读量1.2k

点赞数

CC 4.0 BY-SA版权

分类专栏： Perl开发

本文链接：https://blog.youkuaiyun.com/zhaoyangjian724/article/details/41543271

Perl开发专栏收录该内容

46 篇文章 ¥39.90 ¥99.00

订阅专栏

本文介绍了Perl编程中标签语句的用法，通过示例展示了如何在循环中使用标签进行控制，例如在多层循环中提前退出。内容包括如何定义标签以及在逻辑判断和循环中的应用。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

表达式为假的情况:
逻辑值为假
值为0
字符串为空‘’
列表为空
undef


[oracle@jhoa perl2]$ cat 3.pl 
@array=qw/1 2 3 4 5 6 7 8 9/;
foreach $var (@array){
print "$var\n";
}
print "循环外\n";
print "$var\n";

[oracle@jhoa perl2]$ perl 3.pl 
1
2
3
4
5
6
7
8
9
循环外

[oracle@jhoa perl2]$ cat 4.pl 
print "使用标签:";
LABEL: for($i=1;$i<5;$i++){
           for ($j=1;$j<5;$j++){
               print "$j";
         last LABEL if $i==3;
        }
}
print "\$i is $i\n";
[oracle@jhoa perl2]$ perl 4.pl 
使用标签:123412341$i is 3