Perl WantArray 函数

描述

如果当前执行函数的上下文正在查找列表值，则此函数返回 true。在标量上下文中返回 false。

句法

以下是该函数的简单语法 -

wantarray

返回值

如果没有上下文，则该函数返回 undef；如果左值需要标量，则该函数返回 0。

例子

以下是显示其基本用法的示例代码 -

#!/usr/bin/perl -w

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