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