我有一个更新RSS提要的Perl子例程.我想测试返回的值,但是函数在很多地方使用,所以我想只测试默认变量$_,据我所知,如果没有指定变量,应该指定返回值.
代码有点太长而无法包含所有内容,但实质上它会执行以下操作
sub updateFeed {
#....
if($error) {
return 0;
}
return 1;
}
Run Code Online (Sandbox Code Playgroud)
为什么呢
$rtn = updateFeed("My message");
if ($rtn < 1) { &Log("updateFeed Failed with error $rtn"); }
Run Code Online (Sandbox Code Playgroud)
不记录任何错误
而
updateFeed("myMessage");
if ($_ < 1) { &Log("updateFeed Failed with error $_"); }
Run Code Online (Sandbox Code Playgroud)
记录错误" updateFeed Failed with error"?(注意消息末尾没有值.)
谁能告诉我为什么默认变量似乎包含空字符串或undef?
perl ×1