perl 子函数中return 0什么意思?

Question

perl 子函数中return 0什么意思?

Answer 1

return 0 其实跟 return 任何值一样, 用得著的时候就会用, 这是由作者你自己决定的. 但有两种情况下, 我们会比较有机会用得上这样的回传值

 

第一个是表示没有错误

1 2 3 4 5 6 7 8 9 10 11 12

sub test {     # .....     return 0 }   $error = test ( 1, 2, 3 ); if ( ! $error ) {     # 做下去... } else {     die "出错了!" }

 

第二种是避免混淆, Perl 在离开一个 sub{} 的时候其实总会有个回传值的, 分别只是那个值是你主动 return 的, 还是 "暗示"的

1 2 3 4 5 6

sub test {     $x = "abc";     print $x; }   print test; # 印出 "abc1"

 

 

1	return undef