Cuál es la diferencia entre el retorno; y regresar undef; en Perl

Question

¿Hay una diferencia entre una subrutina que hace

return; 

y uno que lo haga

return undef; 

?

Answer 1

return; devolverá una lista vacía en contexto de lista pero undef en contexto escalar. return undef; siempre devolverá un solo valor undef incluso en el contexto de la lista.

En general, no suele ser una buena idea para return undef; de una subrutina que normalmente se utiliza en el contexto de lista:

sub foo { return undef } 
if (my @x = foo()) { 
    print "oops, we think we got a result"; 
} 

En general, no suele ser una buena idea para return; de una subrutina que normalmente se utiliza en contexto escalar , porque no se comportará como el usuario espera en el contexto de la lista:

sub foo { return } 
%x = ('foo' => foo(), 'bar' => 'baz'); 
if (! exists $x{'bar'}) { 
    print "oops, bar became a value, not a key"; 
} 

Ambos de estos errores ocurren un poco en la práctica, este último más aún, tal vez porque los submarinos que se espera que devolver un escalar son más común. Y si se espera que devuelva un escalar, es mejor que devuelva un escalar.

Answer 2

Dada

sub foo { return; } 
sub bar { return undef; } 

En contexto escalar, se comportan de la misma.

my $foo = foo(); # $foo is undef 
my $bar = bar(); # $bar is undef 

En el contexto de lista, se comportan de manera diferente

my @foo = foo(); # @foo is() (an empty list) 
my @bar = bar(); # @bar is (undef) (a one-element list) 

Tenga en cuenta que una lista de un solo elemento es un valor verdadero en contexto booleano, a pesar de que es el único elemento undef.

En general, generalmente no es una buena idea return undef; desde una subrutina, debido a su comportamiento en contexto.

Answer 3

Creo que todavía estoy de acuerdo con PBP.

1) Se debe evitar la función de anidación llama:

my $result = bar(); 
foo(1, $result, 2); 

2) Siempre debe ser explícita (cuando hacer las cosas "complicadas"):

foo(1, scalar bar(), 2); 

Answer 4

el libro "Perl Best Practices" recomienda el uso de return; en lugar de return undef; porque este último devolverá una lista de un elemento en el contexto de la lista (las otras respuestas ya lo mencionan). Esto sería un "error desagradable" según el libro.

Sin embargo, creo que devolver nada realmente puede causar errores serios (probablemente difíciles de encontrar), mientras que llamar a una función booleana en contexto de lista parece bastante simple de depurar.

Así que siempre retorno algo (que evalúa a) falso en mis funciones booleanas (normalmente 0 para falso y 1 para el verdadero).
(Sí, esto también podría devolver una lista de un solo elemento en el contexto de la lista - por lo que el comentario en el libro es técnicamente correcto -., Pero entonces el error real sería llamar a la función booleana en el contexto de la lista)

Para ser claro, todavía recomiendo el libro. Ofrece muchos buenos consejos.
Y me refiero al Capítulo 9 (Subprogramas), página 199/200 ("Utilizar un retorno simple para devolver la falla") en el libro "Mejores prácticas de Perl" por Damian Conway (O'Reilly Media, Inc.), ISBN 978-0-596-00173-5. No estoy seguro si hay otra/nueva edición.

Nota al margen:
Perl parece devolver una cadena vacía al negar algo. my $foo = 5; return !$foo; devuelve q().