退货有什么区别;并返回undef;在Perl

Question

是否有确实

return; 

，做

return undef; 

子程序和一之间的区别吗？

Answer 1

return;将返回列表上下文中的空列表，但在标量上下文中返回undef。即使在列表上下文中，return undef;也会始终返回单个值undef。

在一般情况下，它通常不是从子程序一个好主意，return undef;通常在列表环境中使用：

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

在一般情况下，它通常不是从子程序一个好主意，return;通常在标量上下文中使用，因为它会不会像用户希望在列表环境：

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

这两种错误的发生相当多的实践中，后者更是这样，也许是因为预期会返回一个标潜艇更共同。如果预计会返回一个标量，那么最好返回一个标量。

Answer 2

鉴于

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

在标量情况下，他们的行为相同。

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

在列表环境里，他们的行为不同

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

注意，一个元素的列表是在布尔上下文中的真实价值，即使唯一的元素是undef。

一般来说，从子程序中通常不是一个好主意return undef;，因为它在上下文中的表现如何。

Answer 3

我想我仍然同意PBP。

1）你应该避免嵌套函数调用：

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

2）你应该始终是明确的（做 “复杂” 的事情）时：

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

Answer 4

书 “Perl的最佳实践”建议使用return;而不是return undef;，因为后者会在列表上下文中返回一个元素列表（其他答案已经提到了这一点）。根据这本书，这将是一个“讨厌的错误”。但是，我认为任何返回都不会导致严重的错误（可能很难找到），而在列表上下文中调用布尔函数似乎相当容易调试。

所以我总是回东西（计算结果为）假我布尔函数（通常为0假，1为真）。 （是的，这也将返回列表上下文中的一个元素列表 - 因此该书中的评论在技术上是正确的 - 但是然后实际的错误将在列表上下文中调用布尔函数）。

To要清楚，我仍然推荐这本书。它提供了很多好的建议。
我在Damian Conway（O'Reilly Media，Inc.）出版的书“Perl Best Practices”中提到了第9章（子例程），第199/200页（“使用纯粹的返回来返回失败”）。 ISBN 978-0-596-00173-5。不确定是否有另一个/更新的版本。

附注：
当否定某些东西时，Perl似乎会返回一个空字符串。 my $foo = 5; return !$foo;返回q（）。