<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 12pt;
font-family:Calibri
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>So consegui corrigir o erro fazendo isso:<div><br><div><div>use base 'Class::Accessor';</div><div><br></div><div>Class::Accessor->mk_accessors (qw(altura largura));</div><br><div><hr id="stopSpelling">From: tiago.peczenyj@gmail.com<br>Date: Sat, 12 Apr 2014 14:25:14 -0300<br>To: rio-pm@pm.org<br>Subject: Re: [Rio-pm] alguma diferença<br><br><div dir="ltr">veja este exemplo:<div><br></div><div><code style="font-size:13px;background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;color:rgb(0,102,153) !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;font-weight:bold !important;min-height:inherit !important;">my</code><span style="color:rgb(0,0,0);font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace;font-size:13px;line-height:15.360000610351563px;white-space:pre;background-color:rgb(250,250,250);"> </span><code style="font-size:13px;background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;color:rgb(170,119,0) !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">$mp</code><span style="color:rgb(0,0,0);font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace;font-size:13px;line-height:15.360000610351563px;white-space:pre;background-color:rgb(250,250,250);"> </span><code style="font-size:13px;color:rgb(0,0,0);background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">= Foo->new({ </code><code style="font-size:13px;background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;color:blue !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">name</code><span style="color:rgb(0,0,0);font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace;font-size:13px;line-height:15.360000610351563px;white-space:pre;background-color:rgb(250,250,250);"> </span><code style="font-size:13px;color:rgb(0,0,0);background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">=> </code><code style="font-size:13px;background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;color:blue !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">"Marty"</code><code style="font-size:13px;color:rgb(0,0,0);background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">, </code><code style="font-size:13px;background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;color:blue !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">role</code><span style="color:rgb(0,0,0);font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace;font-size:13px;line-height:15.360000610351563px;white-space:pre;background-color:rgb(250,250,250);"> </span><code style="font-size:13px;color:rgb(0,0,0);background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">=> </code><code style="font-size:13px;background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;color:blue !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">"JAPH"</code><span style="color:rgb(0,0,0);font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace;font-size:13px;line-height:15.360000610351563px;white-space:pre;background-color:rgb(250,250,250);"> </span><code style="font-size:13px;color:rgb(0,0,0);background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">});</code><br>
</div><div><code style="font-size:13px;color:rgb(0,0,0);background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;"><br>
</code></div><div><code style="font-size:13px;color:rgb(0,0,0);background-color:rgb(250,250,250);white-space:nowrap;line-height:15.360000610351563px;font-family:Consolas,'Bitstream Vera Sans Mono','Courier New',Courier,monospace !important;padding:0px !important;border-top-left-radius:0px !important;border-top-right-radius:0px !important;border-bottom-right-radius:0px !important;border-bottom-left-radius:0px !important;border:0px !important;background-image:none !important;height:auto !important;overflow:visible !important;vertical-align:baseline !important;width:auto !important;min-height:inherit !important;">vc esqueceu os { } -- que são exigidos pelo Class::Accessor</code></div>
</div><div class="ecxgmail_extra"><br><br><div class="ecxgmail_quote">2014-04-12 14:09 GMT-03:00 Aureliano Guedes <span dir="ltr"><<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>></span>:<br>
<blockquote class="ecxgmail_quote" style="border-left:1px #ccc solid;padding-left:1ex;">
<div><div dir="ltr"><div><div dir="ltr"><div>Estou tentando testar esse módulo.<div>Devo estar cometendo algum erro que eu não esteja vendo</div><div><br></div></div><div><a href="http://pastebin.com/M2G16tkN" target="_blank">retangulo.pm</a></div>
<div><a href="http://pastebin.com/3MmyxSa8" target="_blank">teste.pl</a></div><div><br></div><div>Erro:</div><div><div>Can't use string ("altura") as a HASH ref while "strict refs" in use at C:/Perl6</div>
<div>4/lib/Class/Accessor.pm line 13.</div></div><div><div class="h5"><div><br></div><div><br><br><div><hr>From: <a href="mailto:renato.cron@gmail.com" target="_blank">renato.cron@gmail.com</a><br>Date: Fri, 11 Apr 2014 17:10:18 -0300<br>
To: <a href="mailto:rio-pm@pm.org" target="_blank">rio-pm@pm.org</a><br>Subject: Re: [Rio-pm] alguma diferença<br><br><div dir="ltr"><a href="http://blogs.perl.org/users/michael_g_schwern/2011/03/and-the-fastest-oo-accessor-is.html" target="_blank">http://blogs.perl.org/users/michael_g_schwern/2011/03/and-the-fastest-oo-accessor-is.html</a><br>
</div><div>
<br><br><div>2014-04-11 17:00 GMT-03:00 Aureliano Guedes <span dir="ltr"><<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>></span>:<br><blockquote style="border-left:1px #ccc solid;padding-left:1ex;">
<div><div dir="ltr">De fato, percebi isso. Mas então o Class::Accessor não traz nada de novo?<div>Como já uso o Moose não vi vantagem nenhuma no Class::Accessor.<br><br><div><hr>From: <a href="mailto:tiago.peczenyj@gmail.com" target="_blank">tiago.peczenyj@gmail.com</a><br>
Date: Fri, 11 Apr 2014 16:37:59 -0300<br>To: <a href="mailto:rio-pm@pm.org" target="_blank">rio-pm@pm.org</a><br>Subject: Re: [Rio-pm] alguma diferença<br><br><div dir="ltr">Moose tem muito mais features (lazy, delegators, roles) e plugins ( procure por MooseX:: ) do que o Class::Accessor, fora os hooks after / before / around.<div>
<br></div><div>Moo é um subset do Moose que também tem muito mais features que o Class::Accessor.</div>
</div><div><br><br><div>2014-04-11 16:33 GMT-03:00 Aureliano Guedes <span dir="ltr"><<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>></span>:<br>
<blockquote style="border-left:1px #ccc solid;padding-left:1ex;">
<div><div dir="ltr">Monges,<div><br></div><div>riam o quanto quiserem mas conheci hoje o Class::Accessor.</div><div>Minha dúvida é: "Qual a diferença dele e do Moose?"</div><div><br></div><div>Ao primeiro ver me parece a mesma coisa.</div>
</div></div>
<br>_______________________________________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><span><font color="#888888"><br></font></span></blockquote></div><span><font color="#888888"><br>
<br clear="all"><div><br></div>-- <br>Tiago B. Peczenyj<br>Linux User #405772<br>
<br><a href="http://about.me/peczenyj" target="_blank">http://about.me/peczenyj</a>
</font></span></div><span><font color="#888888">
<br>_______________________________________________
Rio-pm mailing list
<a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a></font></span></div></div> </div></div>
<br>_______________________________________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br></blockquote></div><br><br clear="all"><div><br></div>-- <br><div><span style="color:rgb(51,51,51);font-size:x-small;">Saravá,</span></div>
<div><span style="color:rgb(51,51,51);font-size:x-small;">Renato CRON</span></div><div><div style="text-align:right;"><font size="1" color="#333333"><a href="http://www.renatocron.com/blog/" target="_blank">http://www.renatocron.com/blog/</a></font></div>
</div><div style="text-align:right;"><font size="1" color="#333333"><a href="http://twitter.com/#%21/renato_cron" target="_blank">@renato_cron</a></font></div>
</div>
<br>_______________________________________________
Rio-pm mailing list
<a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a></div></div> </div></div></div><div><div class="h5">
<br>_______________________________________________
Rio-pm mailing list
<a href="mailto:Rio-pm@pm.org" target="_blank">Rio-pm@pm.org</a>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a></div></div></div> </div></div>
<br>_______________________________________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br></blockquote></div><br><br clear="all"><div><br></div>-- <br>Tiago B. Peczenyj<br>Linux User #405772<br>
<br><a href="http://about.me/peczenyj" target="_blank">http://about.me/peczenyj</a>
</div>
<br>_______________________________________________
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm</div></div></div> </div></body>
</html>