无涯教程-Perl - last 语句函数

这篇具有很好参考价值的文章主要介绍了无涯教程-Perl - last 语句函数。希望对大家有所帮助。如果存在错误或未考虑完全的地方,请大家不吝赐教,您也可以点击"举报违法"按钮提交疑问。

当在循环内遇到 last 语句时,循环立即终止,程序控制在循环后的下一条语句处恢复。您可以为LABEL提供最后一个语句,其中LABEL是循环的标签。 last 语句可以在嵌套循环内使用,如果未指定LABEL,则该语句将适用于最近的循环。

last - 语法

last [LABEL];

last - 流程图

last - 示例

#!/usr/local/bin/perl

$a=10;
while( $a < 20 ) {
   if( $a == 15) {
      # terminate the loop.
      $a=$a + 1;
      last;
   }
   print "value of a: $a\n";
   $a=$a + 1;
}

执行以上代码后,将产生以下输出-

value of a: 10
value of a: 11
value of a: 12
value of a: 13
value of a: 14

让我们举一个示例,我们将在下一条语句中使用LABEL-

#!/usr/local/bin/perl

$a=0;
OUTER: while( $a < 4 ) {
   $b=0;
   print "value of a: $a\n";
   INNER:while ( $b < 4) {
      if( $a == 2) {
         # terminate outer loop
         last OUTER;
      }
      $b=$b + 1;
      print "Value of b : $b\n";
   }
   print "\n";
   $a=$a + 1;
}

执行以上代码后,将产生以下输出-

value of a : 0
Value of b : 1
Value of b : 2
Value of b : 3
Value of b : 4

value of a : 1
Value of b : 1
Value of b : 2
Value of b : 3
Value of b : 4

value of a : 2

Perl 中的 last 语句函数 - 无涯教程网无涯教程网提供当在循环内遇到 last 语句时,循环立即终止,程序控制在循环后的下一条语句处恢复。您...https://www.learnfk.com/perl/perl-last-statement.html文章来源地址https://www.toymoban.com/news/detail-626617.html

到了这里,关于无涯教程-Perl - last 语句函数的文章就介绍完了。如果您还想了解更多内容,请在右上角搜索TOY模板网以前的文章或继续浏览下面的相关文章,希望大家以后多多支持TOY模板网!

本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若转载,请注明出处: 如若内容造成侵权/违法违规/事实不符,请点击违法举报进行投诉反馈,一经查实,立即删除!

领支付宝红包 赞助服务器费用

相关文章

  • 无涯教程-Perl - seekdir函数

    此功能将DIRHANDLE中的当前位置设置为POS。 POS的值必须是Telldir先前返回的值。 seekdir()函数类似于Unix seekdir()系统调用。 以下是此函数的简单语法- 如果失败,此函数返回0,如果成功,则返回1。 以下是显示其基本用法的示例代码,在/tmp内创建一个目录testdir- 执行上述代码后,将产生

    2024年02月13日
    浏览(34)
  • 无涯教程-Perl - redo函数

    此函数将重新启动当前循环,而不会强制判断控制语句。块中不再执行任何语句。如果存在继续块,将不会执行。如果指定了LABEL,则在LABEL标识的循环开始时重新开始执行。 以下是此函数的简单语法- 此函数不返回任何值。 以下是显示其基本用法的示例代码- 执行上述代码后,将

    2024年02月13日
    浏览(31)
  • 无涯教程-Perl - grep函数

    此函数从LIST中提取EXPR为TRUE的所有元素。 以下是此函数的简单语法- 此函数返回在标量context中表达式返回true的次数以及在列表context中与表达式匹配的元素列表。 以下是显示其基本用法的示例代码- 执行上述代码后,将产生以下输出- Perl 中的 grep函数 - 无涯教程网 无涯教程网

    2024年02月13日
    浏览(34)
  • 无涯教程-Perl - sub函数

    此函数定义一个新的子例程。上面显示的参数遵循以下规则- NAME是子例程的名称。可以在有或没有原型规范的情况下预先声明命名的子例程(没有关联的代码块)。 匿名子例程必须具有定义。 PROTO定义了函数的原型,调用该函数以验证提供的参数时将使用该原型。 ATTRS为解析器定

    2024年02月12日
    浏览(49)
  • 无涯教程-Perl - sethostent函数

    该函数应在首次调用gethostent之前调用。 STAYOPEN参数是可选的,在大多数系统上未使用。 当gethostent()检索主机数据库中下一行的信息时,然后sethostent设置(或重置)枚举到主机条目集的开头。 以下是此函数的简单语法- 此函数不返回任何值。 以下是显示其基本用法的示例代码- 执行

    2024年02月12日
    浏览(39)
  • 无涯教程-Perl - endnetent函数

    此功能告诉系统您不再希望使用getnetent从网络列表中读取条目。 以下是此函数的简单语法- 此函数不返回任何值。 以下是显示其基本用法的示例代码- 执行上述代码后,将产生以下输出- Perl 中的 endnetent函数 - 无涯教程网 无涯教程网提供描述此功能告诉系统您不再希望使用ge

    2024年02月14日
    浏览(35)
  • 无涯教程-Perl - endservent函数

    此功能告诉系统您不再期望使用getservent从服务文件中读取条目。 以下是此函数的简单语法- 此函数不返回任何值。 以下是显示其基本用法的示例代码- Perl 中的 endservent函数 - 无涯教程网 无涯教程网提供描述此功能告诉系统您不再期望使用getservent从服务文件中读取条目。 语

    2024年02月13日
    浏览(34)
  • 无涯教程-Perl - endhostent函数

    此函数告诉系统您不再希望使用gethostent从hosts文件读取条目。 以下是此函数的简单语法- 此函数不返回任何值。 以下是显示其基本用法的示例代码- 执行上述代码后,将产生以下输出- Perl 中的 endhostent函数 - 无涯教程网 无涯教程网提供描述此函数告诉系统您不再希望使用geth

    2024年02月13日
    浏览(36)
  • 无涯教程-Perl - unshift函数

    此函数按顺序将LIST中的元素放在ARRAY的开头。这与shift()相反。 以下是此函数的简单语法- 此函数返回ARRAY中新元素的数量。 以下是显示其基本用法的示例代码- 执行上述代码后,将产生以下输出- Perl 中的 unshift函数 - 无涯教程网 无涯教程网提供描述此函数按顺序将LIST中的元素

    2024年02月12日
    浏览(57)
  • 无涯教程-Perl - undef函数

    此函数未定义EXPR的值。用于标量,列表,哈希,函数或类型范围。在带有诸如undef $hash {$key}之类的语句的哈希上使用;实际上将指定键的值设置为未定义的值。 如果要从哈希中删除元素,请使用delete函数。 以下是此函数的简单语法- 此函数返回undef。 以下是显示其基本用法的示例

    2024年02月12日
    浏览(37)

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

博客赞助

微信扫一扫打赏

请作者喝杯咖啡吧~博客赞助

支付宝扫一扫领取红包,优惠每天领

二维码1

领取红包

二维码2

领红包