是否有可能(并且明智地)将Moose对象评估的值更改为标量上下文.例如,如果我这样做
my $object = MyObject->new(); print $object;
而不是打印像：
MyObject=HASH(0x1fe9a64)
我可以让它打印一些其他自定义字符串吗？
解决方法
看看
overload pragma.我不认为你可以重载标量上下文,但尝试重载字符串化(用“”表示,你必须引用它变成看起来很傻””,使用q运算符引用使其更具可读性).
#!/usr/bin/env perl
use strict;
use warnings;
package MyObject;
use Moose;
use overload
q("") => sub { return shift->val() };
has 'val' => ( isa => 'Str',is => 'rw',required => 1);
package main;
my $obj = MyObject->new( val => 'Hello' );
print $obj; # Hello