我在使用git时遇到了SVN perl模块中的错误：
Bizarre copy of UNKNOWN in subroutine entry at /usr/lib/perl5/vendor_perl/SVN/Base.pm line 80.
我不太确定这是一个perl bug还是一个颠覆bug.这是相关部分：
# insert the accessor
if (m/(.*)_get$/) {
my $member = $1;
*{"${caller}::$1"} = sub {
&{"SVN::_${pkg}::${prefix}${member}_". # <<<< line 80
(@_ > 1 ? 'set' : 'get')} (@_)
}
}
什么是“奇怪的副本”？谁的错呢？
编辑：软件版本
>颠覆1.6.15-1
> perl 5.14.0-1
解决方案：使用不兼容的标志进行编译时会发生这种情况：
https://groups.google.com/d/msg/subversion_users/EOru50ml6sk/5xrbu3luPk4J
解决方法
perldoc为您提供简短的答案,但简短的STFW会话会产生更多细节.这基本上是Perl中碎片堆栈的证据.
琐碎的例子：
#!/usr/bin/perl
my @A = 1..5;
sub blowUp {
undef @A;
my $throwAway = {};
print for @_; # <== line 6
}
blowUp(@A);
__END__
bash$./blowitup
Bizarre copy of HASH in print at ./blowitup line 6.
并且为了使它更有趣,没有$throwAway赋值,这是一个看不见的错误(虽然在’使用警告’下它至少仍会告诉你,你正试图访问未初始化的值).只是当你做一个新的任务,你看到了奇怪的行为.
因为@_本质上是词法范围的子程序,并且参数是通过引用传递的,所以这个小子程序基本上通过取消@_指向的东西从其自身中拉出来(如果你改变你会得到相同的行为)未成年人的任务,fwiw).我在perl5-porters上发现了一些帖子,这些帖子提到这是一个事实,即堆栈中的项目不是引用计数,因此没有干净地释放.
因此,虽然我没有深入查看完整源代码中的所有代码,但我会继续猜测那里的某些东西搞乱了@_传递的东西;然后当再次引用@_时,Perl告诉你丹麦有些东西烂了.
当前的问题是脚本/模块中的一个错误,哇. Perl没有引用计算这些项目的更深层次的问题也存在,但我怀疑你在短期内修复模块会有更好的运气. 原文链接：https://www.f2er.com/Perl/171911.html