[Rio-pm] Tratamento de dados para CSV

[Fernando Oliveira]

perl -lnE'/;/;$,=$&;++$m{$`}{$'}}{say X=>@a=keys%m;say$_,@{$m{$_}}{@a}for em a
' tabela.txt


Esse funciona



Just another Perl Hacker,
Fernando (SmokeMachine)


Em 1 de junho de 2012 13:17, Fernando Oliveira
<fernandocorrea em gmail.com>escreveu:

> Tem algo errado
>
>
>
>
> Just another Perl Hacker,
> Fernando (SmokeMachine)
>
>
> 2012/6/1 Fernando Oliveira <fernandocorrea em gmail.com>
>
>> perl -lnE'/;/;$,=$&;++$m{$`}{$´}}{say X=>@a=keys%m;say
>> $_,@{$m{$_}}{@a}for em a' tabela.txt
>>
>> tinha esquecido o ";"
>>
>>
>>
>>
>> Just another Perl Hacker,
>> Fernando (SmokeMachine)
>>
>>
>> 2012/6/1 Fernando Oliveira <fernandocorrea em gmail.com>
>>
>>> perl -lnE'/;/;$,=$&++$m{$`}{$´}}{say X=>@a=keys%m;say
>>> $_,@{$m{$_}}{@a}for em a' tabela.txt
>>
>>
>>
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20120601/2bc9973d/attachment.html>