[Rio-pm] Tratamento de dados para CSV

Fernando Oliveira fernandocorrea em gmail.com
Sexta Junho 1 09:23:15 PDT 2012


C:\>perl -lnE"/;/;$,=$&;++$m{$`}{$'}}{say
X=>@a=keys%m;say$_,@{$m{$_}}{@a}for em a" tabela.txt
X;Joao;Pedro;Manoel
Joao;;1;
Pedro;;;1
Manoel;;1;



Just another Perl Hacker,
Fernando (SmokeMachine)


2012/6/1 breno <breno em rio.pm.org>

> perl -F\; -lanE'++$m{$F[0]}{$F[1]}}{$,=";";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/27f79883/attachment.html>


Mais detalhes sobre a lista de discussão Rio-pm