zoukankan      html  css  js  c++  java
  • perl return和break

    zjzc01:/root/test# cat a3.pl 
    sub mask {
            my $n=shift;
            my $j =100;
             for ($i = 1;$i <= 5;$i++){
             print "$i is $i
    ";
            while ($n=$n+1) {
                    $j++;
              print "$n is $n
    ";
              if ($n==10){print "$n---end is $n
    ";$n=0;last};
            }}
    };
    
    &mask(1);
    zjzc01:/root/test# perl a3.pl 
    $i is 1
    $n is 2
    $n is 3
    $n is 4
    $n is 5
    $n is 6
    $n is 7
    $n is 8
    $n is 9
    $n is 10
    $n---end is 10
    $i is 2
    $n is 1
    $n is 2
    $n is 3
    $n is 4
    $n is 5
    $n is 6
    $n is 7
    $n is 8
    $n is 9
    $n is 10
    $n---end is 10
    $i is 3
    $n is 1
    $n is 2
    $n is 3
    $n is 4
    $n is 5
    $n is 6
    $n is 7
    $n is 8
    $n is 9
    $n is 10
    $n---end is 10
    $i is 4
    $n is 1
    $n is 2
    $n is 3
    $n is 4
    $n is 5
    $n is 6
    $n is 7
    $n is 8
    $n is 9
    $n is 10
    $n---end is 10
    $i is 5
    $n is 1
    $n is 2
    $n is 3
    $n is 4
    $n is 5
    $n is 6
    $n is 7
    $n is 8
    $n is 9
    $n is 10
    $n---end is 10
    
    
    last 是退出当前循环
    
    zjzc01:/root/test# cat a3.pl 
    sub mask {
            my $n=shift;
            my $j =100;
             for ($i = 1;$i <= 5;$i++){
             print "$i is $i
    ";
            while ($n=$n+1) {
                    $j++;
              print "$n is $n
    ";
              if ($n==10){print "$n---end is $n
    ";$n=0;return};
            }}
    };
    
    &mask(1);
    zjzc01:/root/test# perl a3.pl 
    $i is 1
    $n is 2
    $n is 3
    $n is 4
    $n is 5
    $n is 6
    $n is 7
    $n is 8
    $n is 9
    $n is 10
    $n---end is 10
    
    return是退出当前函数
    
    退出循环是break
    return是退出函数并返回, 如果函数有返回值,可以将返回值返回

  • 相关阅读:
    CF1082E Increasing Frequency
    CF1083B The Fair Nut and String
    week2
    CF1082G Petya and Graph
    后缀数组学习笔记
    单纯形法
    验证rbd的缓存是否开启
    如何删除一台OSD主机
    Mon失效处理方法
    查询osd上的pg数
  • 原文地址:https://www.cnblogs.com/zhaoyangjian724/p/6200366.html
Copyright © 2011-2022 走看看