note
tobyink
<p>The problem is, this is sloppy:</p>
<code>
ClassName->new
</code>
<p>It will behave differently depending on whether or not there is a sub called <c>ClassName</c> in the current package. This is a pretty hard to debug error, and is not really Moose's fault. The following snippet illustrates the problem and doesn't use Moose anywhere...</p>
<code>
use 5.010;
use strict;
use LWP::UserAgent;
{
package ClassName;
sub new { bless [@_], $_[0] }
}
{
package main;
sub ClassName () { 'LWP::UserAgent' };
my $obj = ClassName->new;
say ref $obj; # says "LWP::UserAgent"
}
</code>
<p>The solution is to institute a policy of <i>never</i> using the <c>BareWord->method</c> syntax. Better, and unambiguous ways of writing <c>ClassName->new</c> are:</p>
<code>
ClassName::->new
# or...
'ClassName'->new
</code>
<p><b>Update:</b> [mod://aliased] is also a rather nice solution.</p>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-757127">
<small><small>
<tt>perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'
</tt></small></small>
</div></div>
987567
987567