Perl wantarray 函数

  • 描述

    wantarray 如果当前正在执行的函数的上下文正在寻找列表值,则此函数返回true。在标量上下文中返回false。
  • 句法

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

    如果没有上下文,则此函数返回undef;如果lvalue需要标量,则此函数返回0。
  • 示例

    以下是显示其基本用法的示例代码-
     
    sub foo {
       return(wantarray() ? qw(A, B, C) : '1');
    }
    
    $result = foo();    # scalar context
    @result = foo();    # array context
    
    print("foo() in a  scalar context: $result\n");
    print("foo() in an array  context:
    @result\n");
    
    尝试一下
    执行以上代码后,将产生以下结果-
    
    foo() in a  scalar context: 1
    foo() in an array  context:
    A, B, C