Perl goto 语句
Perl 教程
· 2019-02-26 23:44:26
Perl 有三种 goto 形式:got LABLE,goto EXPR,和 goto &NAME:
序号 | goto 类型 |
---|---|
1 | goto LABEL 找出标记为 LABEL 的语句并且从那里重新执行。 |
2 | goto EXPR goto EXPR 形式只是 goto LABEL 的一般形式。它期待表达式生成一个标记名称,并跳到该标记处执行。 |
3 | goto &NAME 它把正 在运行着的子进程替换为一个已命名子进程的调用。 |
语法
语法格式如下所示:
goto LABEL 或 goto EXPR 或 goto &NAME
流程图
实例
以下两个实例在变量 $a 为 15 时跳出输出。
以下是一个常用的 goto 实例:
实例
#/usr/bin/perl
$a = 10;
LOOP:do
{
if( $a == 15){
# 跳过迭代
$a = $a + 1;
# 使用 goto LABEL 形式
print "跳出输出 \n";
goto LOOP;
print "这一句不会被执行 \n";
}
print "a = $a\n";
$a = $a + 1;
}while( $a < 20 );
执行以上程序,输出结果为:
a = 10 a = 11 a = 12 a = 13 a = 14 跳出输出 a = 16 a = 17 a = 18 a = 19
以下实例使用了 goto EXPR形式。我们使用了两个字符串,并使用点号 (.) 来链接。
实例
$a = 10;
$str1 = "LO";
$str2 = "OP";
LOOP:do
{
if( $a == 15){
# 跳过迭代
$a = $a + 1;
# 使用 goto EXPR 形式
goto $str1.$str2; # 类似 goto LOOP
}
print "a = $a\n";
$a = $a + 1;
}while( $a < 20 );
执行以上程序,输出结果为:
a = 10 a = 11 a = 12 a = 13 a = 14 a = 16 a = 17 a = 18 a = 19
点击查看所有 Perl 教程 文章: https://www.codercto.com/courses/l/19.html
无懈可击的Web设计
西德霍姆 / 刘建宁 / 清华大学出版社 / 2009-4 / 59.90元
一个网站,无论视觉上多么美观,内容多么丰富,如果不能面向最广泛的用户群,那它就不算是真正成功的网站。《无懈可击的Web设计:利用XHTML和CSS提高网站的灵活性与适应性》是Web标准设计领域的公认专家Dan Cederholm的倾力之作,向您描述了基于Web标准的设计策略,以适应各种各样的用户浏览方式。书中每一章的开头都给出了一个基于传统HTML技术的实例,然后对它进行重构,指出它的局限性,并利......一起来看看 《无懈可击的Web设计》 这本书的介绍吧!