Función de retorno de Perl

Descripción

Esta función devuelve EXPR al final de una subrutina, bloque o función do. EXPR puede ser un valor escalar, matriz o hash; El contexto se seleccionará en el momento de la ejecución. Si no se proporciona EXPR, devuelve una lista vacía en el contexto de lista, undef en contexto escalar o nada en un contexto vacío.

Sintaxis

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

return EXPR

return

Valor devuelto

Esta función regresa en Contexto escalar: Lista, que puede interpretarse como contexto escalar, lista o vacío.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/usr/bin/perl -w

$retval = Sum(5,10);
print ("Return value is $retval\n" );

@retval = Sum(5,10);
print ("Return value is @retval\n" );

sub Sum($$) {
   my($a, $b ) = @_; 

   my $c = $a + $b;
   
   return($a, $b, $c);
}

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

Return value is 15
Return value is 5 10 15