[Cascavel-pm] Res: Res: Acesso aleatório à arquivos

[Fernando Corrêa de Oliveira]

-2

perl -F, -nalE'push@{$z{shift em F}}, em F;END{say"$_ => ".join",",@{$z{$_}}for keys%z}' arquivo.txt

Em 22/02/2011, às 14:55, Renato Santos escreveu:

> perl -nale '@x=split/,/;push(@{$z->{shift em x}}, em x);END{for(keys%{$z}){print"$_ => ".join",",@{$z->{$_}}}}'arquivo.txt

Just Another Perl Hacker
Fernando Corrêa de Oliveira
fernandocorrea em gmail.com