Função de retorno Perl

Descrição

Esta função retorna EXPR no final de uma sub-rotina, bloco ou função do. EXPR pode ser um valor escalar, array ou hash; contexto será selecionado em tempo de execução. Se nenhum EXPR for fornecido, retorna uma lista vazia no contexto da lista, undef no contexto escalar ou nada em um contexto vazio.

Sintaxe

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

return EXPR

return

Valor de retorno

Esta função retorna em Contexto escalar: Lista, que pode ser interpretado como contexto escalar, lista ou vazio.

Exemplo

A seguir está o código de exemplo que mostra seu 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);
}

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

Return value is 15
Return value is 5 10 15