-1<div>perl -plE&#39;$z{$`}.=$&amp;if/,.*/}for(keys%z){$_.=&quot;=&gt;$z{$_}&quot;&#39; arquivo.txt</div><div><br></div><div>:P<br clear="all"><br>[]s,<br><br><div>@_marcioferreira</div><div>Marcio Ferreira</div><div><a href="http://marciodesouzaferreira.blogspot.com/" target="_blank">marciodesouzaferreira.blogspot.com</a><br>

<br></div><div><span style="font-family:sans-serif;line-height:16px"><span style="font-size:x-small">&quot;<a style="text-decoration:none"><font color="#000000">Perl</font></a> lives as the &#39;toolbox for Unix&#39; &quot;</span></span></div>

<br>
<br><br><div class="gmail_quote">Em 22 de fevereiro de 2011 19:59, Fernando Corrêa de Oliveira <span dir="ltr">&lt;<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>&gt;</span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">

-1<br>
<br>
perl -plE&#39;$z{$`}.=$&amp;if/,.*/}for(keys%z){$_=&quot;$_=&gt;$z{$_}&quot;&#39; arquivo.txt<br>
<br>
<br>
Em 22/02/2011, às 19:43, Daniel de Oliveira Mantovani escreveu:<br>
<div><div></div><div class="h5"><br>
&gt; Mas mesmo assim, o seu está bem menor do que eu estava pensando.<br>
&gt;<br>
&gt; 2011/2/22 Daniel de Oliveira Mantovani &lt;<a href="mailto:daniel.oliveira.mantovani@gmail.com">daniel.oliveira.mantovani@gmail.com</a>&gt;:<br>
&gt;&gt; 2011/2/22 Marco Lima &lt;<a href="mailto:braun.lima@gmail.com">braun.lima@gmail.com</a>&gt;:<br>
&gt;&gt;&gt; Mantovani ! Fail eh vc hehehe o problema foi com o autocomplemento do celular!<br>
&gt;&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt; Eu estava montando o golf com regexp na cabeça, e ia ver isso depois<br>
&gt;&gt; que eu terminasse de trabalhar, aí você mandou um golf com regexp :P<br>
&gt;&gt;<br>
&gt;&gt;&gt; Fernando vc num disse quantas tacadas e se consegui chegar no green!<br>
&gt;&gt;&gt;<br>
&gt;&gt;&gt; Marco Lima<br>
&gt;&gt;&gt; Mobile<br>
&gt;&gt;&gt; <a href="mailto:braun.lima@gmail.com">braun.lima@gmail.com</a><br>
&gt;&gt;&gt; +55 21 76578103<br>
&gt;&gt;&gt; -----Msg original-----<br>
&gt;&gt;&gt; De: Fernando Corrêa de Oliveira<br>
&gt;&gt;&gt; Enviado:  22/02/2011 19:23:22<br>
&gt;&gt;&gt; Assunto:  Re: [Cascavel-pm] RES: Re: Acesso aleatório à arquivos<br>
&gt;&gt;&gt;<br>
&gt;&gt;&gt; Po mantovani!!! fail... mas pq?!<br>
&gt;&gt;&gt; Corrigindo, a pedido do mago, o código feito em celular:<br>
&gt;&gt;&gt;<br>
&gt;&gt;&gt; perl -nE &#39;if(/(\w+)(\,.*)/){$z{$1}.=$2}END{say&quot;$_=&gt;$z{$_}&quot;for keys%z}&#39; arquivo.txt<br>
&gt;&gt;&gt;<br>
&gt;&gt;&gt; Em 22/02/2011, às 19:19, Daniel de Oliveira Mantovani escreveu:<br>
&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt; 2011/2/22 Marco Lima &lt;<a href="mailto:braun.lima@gmail.com">braun.lima@gmail.com</a>&gt;:<br>
&gt;&gt;&gt;&gt;&gt; Perl -nE &#39;if((/\w+)(\,.*)/){$z{$1}.=$2}END{say&quot;$_=&gt;$z{$_}&quot;for key%z}&#39; arquivo.txt<br>
&gt;&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt; fail<br>
&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt;&gt; Nao contei e nem testei pq estou no trânsito! Mas da para passar a idéia . . . Fernando testa e arruma, mas eu quero credito!<br>
&gt;&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt;&gt; Me diz aí se pelo menos acertei no green!<br>
&gt;&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt;&gt; Eden:<br>
&gt;&gt;&gt;&gt;&gt; perl -F, -nalE&#39;push@{$z{shift@F}},@F}{$&quot;=&quot;,&quot;;say&quot;$_ =&gt; @{$z{$_}}&quot;for<br>
&gt;&gt;&gt;&gt;&gt; keys%z&#39; arquivo.txt<br>
&gt;&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt;&gt; --<br>
&gt;&gt;&gt;&gt;&gt;    Eden Cardim       Need help with your Catalyst or DBIx::Class project?<br>
&gt;&gt;&gt;&gt;&gt;   Code Monkey                    <a href="http://www.shadowcat.co.uk/catalyst/" target="_blank">http://www.shadowcat.co.uk/catalyst/</a><br>
&gt;&gt;&gt;&gt;&gt;  Shadowcat Systems Ltd.  Want a managed development or deployment platform?<br>
&gt;&gt;&gt;&gt;&gt; <a href="http://blog.edencardim.com/" target="_blank">http://blog.edencardim.com/</a>            <a href="http://www.shadowcat.co.uk/servers/" target="_blank">http://www.shadowcat.co.uk/servers/</a><br>


&gt;&gt;&gt;&gt;&gt; _______________________________________________<br>
&gt;&gt;&gt;&gt;&gt; Cascavel-pm mailing list<br>
&gt;&gt;&gt;&gt;&gt; <a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
&gt;&gt;&gt;&gt;&gt; <a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
&gt;&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt;&gt; _______________________________________________<br>
&gt;&gt;&gt;&gt;&gt; Cascavel-pm mailing list<br>
&gt;&gt;&gt;&gt;&gt; <a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
&gt;&gt;&gt;&gt;&gt; <a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
&gt;&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt;<br>
&gt;&gt;&gt;&gt; --<br>
&gt;&gt;&gt;&gt; &quot;If you’ve never written anything thoughtful, then you’ve never had<br>
&gt;&gt;&gt;&gt; any difficult, important, or interesting thoughts. That’s the secret:<br>
&gt;&gt;&gt;&gt; people who don’t write, are people who don’t think.&quot;<br>
&gt;&gt;&gt;&gt; _______________________________________________<br>
&gt;&gt;&gt;&gt; Cascavel-pm mailing list<br>
&gt;&gt;&gt;&gt; <a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
&gt;&gt;&gt;&gt; <a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
&gt;&gt;&gt;<br>
&gt;&gt;&gt; Just Another Perl Hacker<br>
&gt;&gt;&gt; Fernando Corrêa de Oliveira<br>
&gt;&gt;&gt; <a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a><br>
&gt;&gt;&gt;<br>
&gt;&gt;&gt; _______________________________________________<br>
&gt;&gt;&gt; Cascavel-pm mailing list<br>
&gt;&gt;&gt; <a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
&gt;&gt;&gt; <a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
&gt;&gt;&gt;<br>
&gt;&gt;&gt; _______________________________________________<br>
&gt;&gt;&gt; Cascavel-pm mailing list<br>
&gt;&gt;&gt; <a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
&gt;&gt;&gt; <a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt;<br>
&gt;&gt; --<br>
&gt;&gt; &quot;If you’ve never written anything thoughtful, then you’ve never had<br>
&gt;&gt; any difficult, important, or interesting thoughts. That’s the secret:<br>
&gt;&gt; people who don’t write, are people who don’t think.&quot;<br>
&gt;&gt;<br>
&gt;<br>
&gt;<br>
&gt;<br>
&gt; --<br>
&gt; &quot;If you’ve never written anything thoughtful, then you’ve never had<br>
&gt; any difficult, important, or interesting thoughts. That’s the secret:<br>
&gt; people who don’t write, are people who don’t think.&quot;<br>
&gt; _______________________________________________<br>
&gt; Cascavel-pm mailing list<br>
&gt; <a href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br>
&gt; <a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br>
<br>
Just Another Perl Hacker<br>
Fernando Corrêa de Oliveira<br>
<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a><br>
<br>
_______________________________________________<br>
Cascavel-pm mailing list<br>
<a href="mailto:Cascavel-pm@pm.org">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></div>