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