<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Tahoma
}
--></style></head>
<body class='hmmessage'><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="code_frame">Regular expression without "/x" flag at line 49, column 18.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_new">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="code_frame">Hard tabs used at line 15, column 12.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_new">See page 20 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#17" target="code_frame">Hard tabs used at line 17, column 17.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_new">See page 20 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#18" target="code_frame">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="_new">See page 209 of PBP.  Severity: 4</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#20" target="code_frame">Ambiguously named variable "record" at line 20, column 2.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/NamingConventions/ProhibitAmbiguousNames.html" target="_new">See page 48 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#23" target="code_frame">Regular expression without "/x" flag at line 23, column 18.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_new">See page 236 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#29" target="code_frame">Regular expression without "/x" flag at line 29, column 20.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_new">See page 236 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#41" target="code_frame">Hard tabs used at line 41, column 13.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_new">See page 20 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#43" target="code_frame">Hard tabs used at line 43, column 17.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_new">See page 20 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#44" target="code_frame">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="_new">See page 209 of PBP.  Severity: 4</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#46" target="code_frame">Ambiguously named variable "record" at line 46, column 2.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/NamingConventions/ProhibitAmbiguousNames.html" target="_new">See page 48 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#49" target="code_frame">Regular expression without "/x" flag at line 49, column 18.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_new">See page 236 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#56" target="code_frame">Regular expression without "/x" flag at line 56, column 25.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/RegularExpressions/RequireExtendedFormatting.html" target="_new">See page 236 of PBP.  Severity: 3</a>
<a href="http://perlcritic.com/tmp/ovXTXZfUGR.html#58" target="code_frame">Hard tabs used at line 58, column 4.</a>  <a href="http://perlcritic.com/pod/Perl/Critic/Policy/CodeLayout/ProhibitHardTabs.html" target="_new">See page 20 of PBP.  Severity: 3</a>
</pre><br><br><div><div id="SkyDrivePlaceholder"></div><hr id="stopSpelling">From: tiago.peczenyj@gmail.com<br>Date: Sat, 24 Nov 2012 18:15:36 -0200<br>To: rio-pm@pm.org<br>Subject: Re: [Rio-pm] Comparação de arquivos<br><br>use o nivel 3 (mediano)<br><br><div class="ecxgmail_quote">2012/11/24 Aureliano Guedes <span dir="ltr"><<a href="mailto:guedes_1000@hotmail.com">guedes_1000@hotmail.com</a>></span><br><blockquote class="ecxgmail_quote" 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 class="ecxim">

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

</div><div><div class="h5">> 2012/11/24 Aureliano Guedes <<a href="mailto:guedes_1000@hotmail.com">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">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">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
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm</div>                                    </div></body>
</html>