小编Was*_*ssy的帖子

为什么我的子例程返回值没有分配给$ _ default变量

我有一个更新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

3
推荐指数
3
解决办法
993
查看次数

标签 统计

perl ×1