ordene por severidade e se guie. se não me engano vc tem uns 9 nivels de "verbosidade" do perlcritic e no mais avantajado (la ele) tem até exemplos. vale a pena.<br><br><div class="gmail_quote">2012/11/24 Aureliano Guedes <span dir="ltr"><<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>></span><br>

<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">


<div><div dir="ltr">
Tem muitas coisas que posso desconsiderar desse perlcritc, ne?!<br><br>agora em <br><pre><a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#49" target="_blank">Regular expression without "/x" flag at line 49, column 18.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_blank">See page 236 of PBP.  Severity: 3</a><br>

<br></pre>fiquei sem entender, pra que esse maldito /x, não me parece que va mudar muita coisa.<br><br>Mas legal, se jogar no nivel  parece ajudar muito... vou ler o PBP<br><br><pre><a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#15" target="_blank">Hard tabs used at line 15, column 12.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_blank">See page 20 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#17" target="_blank">Hard tabs used at line 17, column 17.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_blank">See page 20 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#18" target="_blank">Close filehandles as soon as possible after opening them at line 18, column 2.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/InputOutput/RequireBriefOpen.html" target="_blank">See page 209 of PBP.  Severity: 4</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#20" target="_blank">Ambiguously named variable "record" at line 20, column 2.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/NamingConventions/ProhibitAmbiguousNames.html" target="_blank">See page 48 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#23" target="_blank">Regular expression without "/x" flag at line 23, column 18.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_blank">See page 236 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#29" target="_blank">Regular expression without "/x" flag at line 29, column 20.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_blank">See page 236 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#41" target="_blank">Hard tabs used at line 41, column 13.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_blank">See page 20 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#43" target="_blank">Hard tabs used at line 43, column 17.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_blank">See page 20 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#44" target="_blank">Close filehandles as soon as possible after opening them at line 44, column 2.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/InputOutput/RequireBriefOpen.html" target="_blank">See page 209 of PBP.  Severity: 4</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#46" target="_blank">Ambiguously named variable "record" at line 46, column 2.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/NamingConventions/ProhibitAmbiguousNames.html" target="_blank">See page 48 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#49" target="_blank">Regular expression without "/x" flag at line 49, column 18.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_blank">See page 236 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#56" target="_blank">Regular expression without "/x" flag at line 56, column 25.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_blank">See page 236 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#58" target="_blank">Hard tabs used at line 58, column 4.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_blank">See page 20 of PBP.  Severity: 3</a>
</pre><br><br><div><div></div><hr>From: <a href="mailto:tiago.peczenyj@gmail.com" target="_blank">tiago.peczenyj@gmail.com</a><br>Date: Sat, 24 Nov 2012 18:15:36 -0200<div><div class="h5"><br>To: <a href="mailto:rio-pm@pm.org" target="_blank">rio-pm@pm.org</a><br>

Subject: Re: [Rio-pm] Comparação de arquivos<br><br>use o nivel 3 (mediano)<br><br><div>2012/11/24 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">
Opa, obrigado então por toda ajuda.<br><br>No mais, so o log do perlcritc.<br><br><a href="http://pastebin.com/esYuR04J" target="_blank">http://pastebin.com/esYuR04J</a><br><br>tenso, ne?!<br><br><div><div></div>> Date: Sat, 24 Nov 2012 18:01:13 -0200<div>



<br>> From: <a href="mailto:breno@rio.pm.org" target="_blank">breno@rio.pm.org</a><br>> To: <a href="mailto:rio-pm@pm.org" target="_blank">rio-pm@pm.org</a><br>> Subject: Re: [Rio-pm] Comparação de arquivos<br>> <br>



</div><div><div>> 2012/11/24 Aureliano Guedes <<a href="mailto:guedes_1000@hotmail.com" target="_blank">guedes_1000@hotmail.com</a>>:<br>> > Breno, que ser meu orientador... hahaha...<br>> ><br>

> > Enfim, ficou assim <a href="http://pastebin.com/zrpLGwQs" target="_blank">http://pastebin.com/zrpLGwQs</a><br>> ><br>> > Ha algo que você mudaria???<br>> ><br>> <br>> Sempre há :)<br>> <br>



> Particularmente, não gosto dessa sua chamada a main() no final do<br>> arquivo, pq esconde a lógica e dá pouca confiança a quem vai olhar o<br>> seu código (instruções podem aparecer a qualquer momento fora de uma<br>



> sub, o figura tem que passar por todo o seu script até saber que vc só<br>> está chamando main()). Eu trocaria a ordem, deixando assim:<br>> <br>> --------------------8<--------------------<br>> use strict;<br>



> use warnings;<br>> use autodie;<br>> <br>> main();<br>> exit;<br>> <br>> # declaracoes de sub aqui embaixo<br>> -------------------->8--------------------<br>> <br>> Assim vc deixa claro o (começo do) fluxo do seu programa e mostra ao<br>



> leitor que não haverão surpresas no meio das subs.<br>> <br>> No mais, experimente usar o Perl::Critic (dá até pra usar online via<br>> <a href="http://perlcritic.com" target="_blank">perlcritic.com</a>) e veja se ele reclama de alguma coisa.<br>



> <br>> []s<br>> <br>> -b<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>



</div></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>Tiago B. Peczenyj<br>Linux User #405772<br>



<br><a href="http://pacman.blog.br" target="_blank">http://pacman.blog.br</a><br>
<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://pacman.blog.br">http://pacman.blog.br</a><br>