在下面的代码块中，我得到此错误
Variable "$host" is not available at /comp/xx.pm line 404.
其中404行是代码块中的最后一行。
问题
我猜想是Capture模块弄乱了if (defined $host) { ...，但是我该如何解决呢？
use Capture::Tiny 'capture';
my $host = $::c{slaves}{$id} if (defined $id);
my ($stdout, $stderr, $exit) = capture {
if (defined $host) {
print "---delete $snap on host\n";
} else {
print "----delete $snap on master\n";
}
}; # line 404
更新
如果我注释行capture及其右括号，则它将执行预期的print行。
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句