Matando as variaveis, essa é a minha tacada:<br><br>perl -naE&#39;say$ARGV if-MARGV&amp;&amp;@F-1&#39; -F/teste/ /dir/*<br><br><div class="gmail_quote">2008/6/19 breno &lt;<a href="mailto:breno@rio.pm.org">breno@rio.pm.org</a>&gt;:<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Golfe em código que não funciona é dose!!!!<br>
<br>
Vcs me matam de vergonha uhauhahuauhauhahu<br>
<br>
Afinal, vamos matar os nomes das variáveis ou não?<br>
<br>
[]s<br>
<font color="#888888"><br>
-b<br>
</font><div class="Ih2E3d"><br>
2008/6/19 Fernando Oliveira &lt;<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>&gt;:<br>
</div><div><div></div><div class="Wj3C7c">&gt; Golf acaba com qq dia de trabalho, né?!<br>
&gt;<br>
&gt; 2008/6/19 Eden Cardim &lt;<a href="mailto:edencardim@gmail.com">edencardim@gmail.com</a>&gt;:<br>
&gt;&gt;<br>
&gt;&gt; 2008/6/19 Lucas Mateus &lt;<a href="mailto:lucasmateus.oliveira@gmail.com">lucasmateus.oliveira@gmail.com</a>&gt;:<br>
&gt;&gt; &gt;&gt; perl -n0E&#39;/(??{$string=&#39;teste&#39;})/&amp;&amp;-MARGV&gt;($MTime=0)&amp;&amp;say$ARGV&#39; /dir/*<br>
&gt;&gt; &gt;<br>
&gt;&gt; &gt; mas esse tbm ta bugado<br>
&gt;&gt;<br>
&gt;&gt; opa:<br>
&gt;&gt;<br>
&gt;&gt; perl -n0E&#39;/(??{$string=&#39;teste&#39;})/&amp;&amp;-M($_=$ARGV)&gt;($MTime=0)&amp;&amp;say&#39; /dir/*<br>
&gt;&gt;<br>
&gt;&gt; --<br>
&gt;&gt; <a href="http://edenc.vox.com" target="_blank">edenc.vox.com</a><br>
&gt;&gt; _______________________________________________<br>
&gt;&gt; Rio-pm mailing list<br>
&gt;&gt; <a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>
&gt;&gt; <a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br>
&gt;<br>
&gt;<br>
&gt;<br>
&gt; --<br>
&gt; Just another Perl Hacker,<br>
&gt; Fernando (SmokeMachine)<br>
&gt; <a href="http://perl-e.org" target="_blank">http://perl-e.org</a><br>
&gt; _______________________________________________<br>
&gt; Rio-pm mailing list<br>
&gt; <a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>
&gt; <a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br>
&gt;<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></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>