<div dir="ltr">Esqueceu de falar do "?" e do "??"...<br><br><div class="gmail_quote">2008/8/26 Luis Motta Campos <span dir="ltr"><<a href="mailto:luismottacampos@yahoo.co.uk">luismottacampos@yahoo.co.uk</a>></span><br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;"><div class="Ih2E3d">Gabriel Vieira wrote:<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
$a=~/^(?:.*?\n){$linha}[^\n]*?$palavra/<br>
<br>
$a contém (=~), no início de seu valor (^), qualquer caractere (.),<br>
zero ou mais vezes (*), limitando o seu tamanho até o próximo match<br>
(?), no caso uma quebra de linha (\n), tudo isso é um grupo que não é<br>
capturado ((?:)) e cujo tamanho, ou vezes que esse grupo é aplicado, é<br>
{$linha}. Isso tudo seguido de qualquer caractere se não nova linha<br>
([^\n]), zero ou mais vezes (*), limitando o seu tamanho até o próximo<br>
match (?), no caso $palavra.<br>
<br>
Que tal ler o perlre?<br>
</blockquote>
<br></div>
Hum. Vamos com calma. os quantificadores "*?" e "+?" são /non-greedy/. Isso quer dizer que eles vão dar match com a menor quantidade possível de caracteres que não invalide o resto da expressão.<br>
<br>
Compare com as versões /greedy/ ("*" e "+"), que batem com a *maior* quantidade possível de caracteres que não invalide a expressão.<br>
<br>
Qualquer definição fora desta é enganosa e pode dar problemas futuros.<div class="Ih2E3d"><br>
<br>
Putamplexos!<br>
-- <br>
Luis Motta Campos is a software engineer,<br>
Perl Programmer, foodie and photographer.<br>
_______________________________________________<br></div><div><div></div><div class="Wj3C7c">
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org" target="_blank">Cascavel-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
</div></div></blockquote></div><br><br clear="all"><br>-- <br>Just another Perl Hacker,<br>Fernando (SmokeMachine)<br><a href="http://perl-e.org">http://perl-e.org</a><br>
</div>