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
  

  复制