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

[Daniel de Oliveira Mantovani]

2011/2/22 Marco Lima <braun.lima em gmail.com>:
> Perl -nE 'if((/\w+)(\,.*)/){$z{$1}.=$2}END{say"$_=>$z{$_}"for key%z}' arquivo.txt
>

fail

> Nao contei e nem testei pq estou no trânsito! Mas da para passar a idéia . . . Fernando testa e arruma, mas eu quero credito!
>
> Me diz aí se pelo menos acertei no green!
>
> Eden:
> perl -F, -nalE'push@{$z{shift em F}}, em F}{$"=",";say"$_ => @{$z{$_}}"for
> keys%z' arquivo.txt
>
> --
>    Eden Cardim       Need help with your Catalyst or DBIx::Class project?
>   Code Monkey                    http://www.shadowcat.co.uk/catalyst/
>  Shadowcat Systems Ltd.  Want a managed development or deployment platform?
> http://blog.edencardim.com/            http://www.shadowcat.co.uk/servers/
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>
> _______________________________________________
> Cascavel-pm mailing list
> Cascavel-pm em pm.org
> http://mail.pm.org/mailman/listinfo/cascavel-pm
>



-- 
"If you’ve never written anything thoughtful, then you’ve never had
any difficult, important, or interesting thoughts. That’s the secret:
people who don’t write, are people who don’t think."