Pois é... aqui no trabalho é assim... :(
Eu garanto q vc não desgostou mais q eu... :(
Just another Perl Hacker,
Fernando (SmokeMachine)
2012/6/1 Stanislaw Pusep <creakt...@gmail.com>
> C:\> :(
>
> ABS()
>
>
>
> On Fri, Jun 1, 2012 at 1:23 PM, Fernando Oliveira <
> fernandocor...@gmail.com> wrote:
>
>> C:\>perl -lnE"/;/;$,=$&;++$m{$`}{$'}}{say
>> X=>@a=keys%m;say$_,@{$m{$_}}{@a}for@a" tabela.txt
>> X;Joao;Pedro;Manoel
>> Joao;;1;
>> Pedro;;;1
>> Manoel;;1;
>>
>>
>>
>> Just another Perl Hacker,
>> Fernando (SmokeMachine)
>>
>>
>> 2012/6/1 breno <br...@rio.pm.org>
>>
>>> perl -F\; -lanE'++$m{$F[0]}{$F[1]}}{$,=";";say
>>>
>>> X=>@a=keys%m;say$_,@{$m{$_}}{@a}for@a' tabela.txt
>>>
>>
>>
>> _______________________________________________
>> Rio-pm mailing list
>> Rio-pm@pm.org
>> http://mail.pm.org/mailman/listinfo/rio-pm
>>
>
>
> _______________________________________________
> Rio-pm mailing list
> Rio-pm@pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>
_______________________________________________
Rio-pm mailing list
Rio-pm@pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
