Perl autoboxing与运算符重载一起似乎不起作用？

Question

我正在尝试使用Perl的自动装箱功能和运营商重载功能，但它们似乎并没有协同工作。

我是否有可能错过了如何正确使用过载的一些细微差别，或者这是一种奇怪的异常行为？

示例代码：

#!/usr/bin/perl
use strict;
use warnings;

package overload_me;
use overload('+' => "overloaded_add");
sub overloaded_add{
    my ($me, $him) = @_;
    $me+$him+1;
}

use autobox NUMBER => 'overload_me';
my $autoboxing_test = 4->overloaded_add(5);
my $overloading_test = 4 + 5;
print "Autoboxing test: 4+5=$autoboxing_test 
Overloading test: 4+5=$overloading_test\n";

测试输出：

Autoboxing test: 4+5=10 Overloading test: 4+5=9

Answer 1

自动装箱不会导致4成为overload_me的实例。它导致左侧的{em>方法调用与4调用overload_me中的方法。这是一个微妙的区别，但却是一个重要的区别，因为它意味着overload根本不适用。 4不是对象，不属于任何类。它仍然只是4，当您计算4 + 5时，它仍然只是4 + 5。

来自the autobox docs：

  

自动装箱是透明的：盒装值不会被祝福到它们的（用户定义的）实现类中（除非方法选择赋予这样的祝福） - 它们只是使用它的方法，就好像它们一样。