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
<[email protected]>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 <[email protected]>
>
>> bom... aqui no windows funfa... :P
>> no windows eu to usando o "" no -e...
>>
>>
>>
>> Just another Perl Hacker,
>> Fernando (SmokeMachine)
>>
>>
>> 2012/6/1 breno <[email protected]>
>>
>>> Ha! Alguém consegue usar $' na shell sem escapar?
>>>
>>>
>>>
>>> On Fri, Jun 1, 2012 at 1:24 PM, Stanislaw Pusep <[email protected]>wrote:
>>>
>>>> C:\> :(
>>>>
>>>> ABS()
>>>>
>>>>
>>>>
>>>> On Fri, Jun 1, 2012 at 1:23 PM, Fernando Oliveira <
>>>> [email protected]> 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 <[email protected]>
>>>>>
>>>>>> perl -F\; -lanE'++$m{$F[0]}{$F[1]}}{$,=";";say
>>>>>>
>>>>>> X=>@a=keys%m;say$_,@{$m{$_}}{@a}for@a' tabela.txt
>>>>>>
>>>>>
>>>>>
>>>>> _______________________________________________
>>>>> Rio-pm mailing list
>>>>> [email protected]
>>>>> http://mail.pm.org/mailman/listinfo/rio-pm
>>>>>
>>>>
>>>>
>>>> _______________________________________________
>>>> Rio-pm mailing list
>>>> [email protected]
>>>> http://mail.pm.org/mailman/listinfo/rio-pm
>>>>
>>>
>>>
>>> _______________________________________________
>>> Rio-pm mailing list
>>> [email protected]
>>> http://mail.pm.org/mailman/listinfo/rio-pm
>>>
>>
>>
>
> _______________________________________________
> Rio-pm mailing list
> [email protected]
> http://mail.pm.org/mailman/listinfo/rio-pm
>
_______________________________________________
Rio-pm mailing list
[email protected]
http://mail.pm.org/mailman/listinfo/rio-pm
