当我使用别人的API与默认变量$_
foreach (@rps_server_details) { @server_data = (); @server_data = split(/,/); @$esp_hosts = (); $filters{server_name} = $server_data[0]; print "--->$_<--\n"; $esp_hosts = $esp->get_hosts(fields => $fields,%filters) || die "$@"; print "--->$_<--\n";
这个输出是:
--->igrid8873.someone.com,app_10<-- Use of uninitialized value in concatenation (.) or string at ./rps_inv_lookup.pl line 120. ---><--
指定我自己的循环变量,而不是依赖$_来解决问题.
我只是使用$_与其他人写的API结合使用天真吗?还是这个API模块中的错误?
解决方法
这是API中的一个错误.如果你在一个函数中使用$_,那么重要的是添加一个
local($_);
在函数内部,以避免调用者的$_,或以其他方式避免使用$_in库函数来调用.
如果您可以将yoursel限制为Perl版本> 5.9.1那么你也可以使$_ lexical这使得它比localwith更容易理解
my $_;
但是,这将打破早期版本的Perl.
从男人的perlvar:
As
$_
is a global variable,this may lead in some cases to
unwanted side-effects. As of perl 5.9.1,you can now use a
lexical version of$_
by declaring it in a file or in a block
with “my”. Moreover,declaring “our $_
” restores the global$_
in the current scope.