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