当前位置:首页 » Perl » perl wantarray()函数

perl wantarray()函数

perl wantarray()函数例子,wantarray()函数实例代码 - 返回true,如果当前正在执行的函数的上下文中正在寻找一个列表值。

语法

wantarray


定义和用法

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

返回值

  • undef - 如果没有上下文

  • 0 如果左值期望标量

例子

#!/usr/bin/perl -w
#by www.yiibai.com

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