Função Perl wantarray

Descrição

Esta função retorna verdadeiro se o contexto da função atualmente em execução estiver procurando por um valor de lista. Retorna falso em um contexto escalar.

Sintaxe

A seguir está a sintaxe simples para esta função -

wantarray

Valor de retorno

Esta função retorna undef se nenhum contexto e 0 se lvalue espera um escalar.

Exemplo

A seguir está o código de exemplo que mostra seu uso básico -

#!/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");

Quando o código acima é executado, ele produz o seguinte resultado -

foo() in a  scalar context: 1
foo() in an array  context:
A, B, C