[Rio-pm] Tratamento de dados para CSV

[Fernando Oliveira]

perl -F\; -anE'chomp$F[1];++$m{$F[0]}{$F[1]}}{$,=";";say X=>@a=keys%m;say
$_,@{$m{$_}}{@a}for em a' tabela.txt



Just another Perl Hacker,
Fernando (SmokeMachine)


Em 1 de junho de 2012 13:03, Stanislaw Pusep <creaktive em gmail.com> escreveu:

> perl -F\; -anE'chomp$F[1];++$m{$F[0]}{$F[1]}}{$,=";";say X=>keys%m;say
> $_,@{$m{$_}}{keys%m}for keys%m' tabela.txt
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20120601/270b259b/attachment.html>