78 chars, eu vou almoçar...
pf não diminuam muito!!! :P
Just another Perl Hacker,
Fernando (SmokeMachine)
2012/6/1 Fernando Oliveira <fernandocor...@gmail.com>
> Então façamos como arquivo:
>
> #!perl -ln
> $m{$`}{$'}=/;/;$,=$&}{print X=>@a=keys%m;print$_,@{$m{$_}}{@a}for@a
>
>
>
> Just another Perl Hacker,
> Fernando (SmokeMachine)
>
>
> 2012/6/1 Stanislaw Pusep <creakt...@gmail.com>
>
>> Em bash, pelo menos, teria que rodar como:
>>
>> perl -MEnglish -lnE'$m{$`}{$POSTMATCH}=/;/;$,=$&}{say
>> X=>@a=keys%m;say$_,@{$m{$_}}{@a}for@a' tabela.txt
>>
>> ABS()
>>
>>
>>
>>
>> On Fri, Jun 1, 2012 at 1:31 PM, Fernando Oliveira <
>> fernandocor...@gmail.com> wrote:
>>
>>> C:\>perl -lnE"$m{$`}{$'}=/;/;$,=$&}{say
>>> X=>@a=keys%m;say$_,@{$m{$_}}{@a}for@a" tabela.txt
>>>
>>>
>>>
>>> Just another Perl Hacker,
>>> Fernando (SmokeMachine)
>>>
>>>
>>> 2012/6/1 Fernando Oliveira <fernandocor...@gmail.com>
>>>
>>>> bom... aqui no windows funfa... :P
>>>> no windows eu to usando o "" no -e...
>>>>
>>>>
>>>>
>>>> Just another Perl Hacker,
>>>> Fernando (SmokeMachine)
>>>>
>>>>
>>>> 2012/6/1 breno <br...@rio.pm.org>
>>>>
>>>>> Ha! Alguém consegue usar $' na shell sem escapar?
>>>>>
>>>>>
>>>>>
>>>>> On Fri, Jun 1, 2012 at 1:24 PM, Stanislaw Pusep
>>>>> <creakt...@gmail.com>wrote:
>>>>>
>>>>>> 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
>>>>>
>>>>
>>>>
>>>
>>> _______________________________________________
>>> 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
