好久没模Perl的语法了。<br>在看attributes的文档的时候一直出现这个语法,<div id=":cm" class="ii gt">比较郁闷。<br>哪位提点一下:<br><br> use attributes ();<br> my ($x,@y,%z);<br> attributes::->import(__PACKAGE__, \$x, 'Bent');<br>
attributes::->import(__PACKAGE__, \@y, 'Bent');<br>
attributes::->import(__PACKAGE__, \%z, 'Bent');<br> ($x,@y,%z) = 1;<br><br><br>第一个地方:<br>attributes::这个写法是省略了什么来着?<br>第二个地方:<br>import<br>我记得是在use的时候自动的调用module的import方法是不是?(例如module require Exporter), 这样就有了一个缺省的import方法<br>
但是问题是attributes哪儿定义了这个方法呢?<br><br>请各位指点。<br><br>谢谢<br><font color="#888888"><br>Mike.G</font></div>