Perl wantarray 函数

说明

此函数在当前执行函数的上下文中寻找列表值时返回 true。在标量上下文中返回 false。

语法

以下是此函数的简单语法 −

wantarray

返回值

此函数在没有上下文的情况下返回 undef，且 lvalue 预期标量时返回 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