Función Perl wantarray

Descripción

Esta función devuelve verdadero si el contexto de la función que se está ejecutando actualmente busca un valor de lista. Devuelve falso en un contexto escalar.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

wantarray

Valor devuelto

Esta función devuelve undef si no hay contexto y 0 si lvalue espera un escalar.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su 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");

Cuando se ejecuta el código anterior, produce el siguiente resultado:

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