Perl return 函数

  • 描述

    return 此函数在子例程,块或do函数的末尾返回EXPR。EXPR可以是标量,数组或哈希值;上下文将在执行时选择。如果未给出EXPR,则在列表上下文中返回一个空列表,在标量上下文中返回undef,在空上下文中不返回任何内容。
  • 句法

    以下是此函数的简单语法-
    
    return EXPR
    
    return
    
  • 返回值

    此函数在标量上下文:列表中返回,可以解释为标量上下文,列表或void上下文。
  • 示例

    以下是显示其基本用法的示例代码-
     
    $retval = Sum(5,10);
    print ("Return value is $retval\n" );
    
    @retval = Sum(5,10);
    print ("Return value is @retval\n" );
    
    sub Sum($) {
       my($a, $b ) = @_; 
    
       my $c = $a + $b;
       
       return($a, $b, $c);
    }
    
    尝试一下
    执行结果:
    
    Return value is 15
    Return value is 5 10 15