在Perl中重载’=’

前端之家收集整理的这篇文章主要介绍了在Perl中重载’=’前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
因为在Perl中简单地重载’=’并不像人们期望的那样行事,这样做的正确方法是什么?

引自overload perldoc:

Simple assignment is not overloadable (the '=' key is used for the Copy Constructor). Perl does have a way to make assignments to an object do whatever you want,but this involves using tie(),not overload – see 07001 and the 07002 examples below.

我已经阅读了COOKBOOKtie的文档,但我很难弄清楚如何以这种方式使用它.

我希望能够像这样创建一个对象:my $object = Object-> new()然后,当我将它分配给某些东西时,我希望它做一些特殊的处理.

例如:$object = 3会在内部执行类似$object-> set_value(3)的操作;

我知道这不一定是好习惯.这更像是一个教育问题.我只是想知道如何做到这一点.不是否应该这样做.

解决方法

你不能这样做.您可以为变量添加魔法,以便在将值赋给变量后调用子,但这与您的要求相差甚远.

此外,你提出的问题并没有多大意义.以下应该怎么做?

my $object;
$object = Object->new();
$object = Object->new();

猜你在找的Perl相关文章