[Rio-pm] Tratamento de dados para CSV

[Fernando Oliveira]

Se a segunda coluna tiver mais elementos inexistentes na 1a, esses não
aparecem.
Continuamos assim? ou voltamos do inicio?


Just another Perl Hacker,
Fernando (SmokeMachine)


2012/6/1 Fernando Oliveira <fernandocorrea em gmail.com>

> Mas e então? O arquivo foi aceito?
>
> E tem mais uma coisa: desde a 1a tacada do Stanislaw, se os elementos de
> antes do ";" forem diferentes do de depois, a tabela fica errada...
>
>
> Just another Perl Hacker,
> Fernando (SmokeMachine)
>
>
> 2012/6/1 Fernando Oliveira <fernandocorrea em gmail.com>
>
>> Então façamos como arquivo:
>>
>> #!perl -ln
>> $m{$`}{$'}=/;/;$,=$&}{print X=>@a=keys%m;print$_,@{$m{$_}}{@a}for em a
>>
>>
>>
>> Just another Perl Hacker,
>> Fernando (SmokeMachine)
>>
>>
>> 2012/6/1 Stanislaw Pusep <creaktive em gmail.com>
>>
>>> Em bash, pelo menos, teria que rodar como:
>>>
>>> perl -MEnglish -lnE'$m{$`}{$POSTMATCH}=/;/;$,=$&}{say
>>> X=>@a=keys%m;say$_,@{$m{$_}}{@a}for em a' tabela.txt
>>>
>>> ABS()
>>>
>>>
>>>
>>>
>>> On Fri, Jun 1, 2012 at 1:31 PM, Fernando Oliveira <
>>> fernandocorrea em gmail.com> wrote:
>>>
>>>> C:\>perl -lnE"$m{$`}{$'}=/;/;$,=$&}{say
>>>> X=>@a=keys%m;say$_,@{$m{$_}}{@a}for em a" tabela.txt
>>>>
>>>>
>>>>
>>>> Just another Perl Hacker,
>>>> Fernando (SmokeMachine)
>>>>
>>>>
>>>> 2012/6/1 Fernando Oliveira <fernandocorrea em gmail.com>
>>>>
>>>>> bom... aqui no windows funfa... :P
>>>>> no windows eu to usando o "" no -e...
>>>>>
>>>>>
>>>>>
>>>>> Just another Perl Hacker,
>>>>> Fernando (SmokeMachine)
>>>>>
>>>>>
>>>>> 2012/6/1 breno <breno em rio.pm.org>
>>>>>
>>>>>> Ha! Alguém consegue usar $' na shell sem escapar?
>>>>>>
>>>>>>
>>>>>>
>>>>>> On Fri, Jun 1, 2012 at 1:24 PM, Stanislaw Pusep <creaktive em gmail.com>wrote:
>>>>>>
>>>>>>> C:\> :(
>>>>>>>
>>>>>>> ABS()
>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> On Fri, Jun 1, 2012 at 1:23 PM, Fernando Oliveira <
>>>>>>> fernandocorrea em gmail.com> wrote:
>>>>>>>
>>>>>>>> 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
>>>>>>>>>
>>>>>>>>
>>>>>>>>
>>>>>>>> _______________________________________________
>>>>>>>> Rio-pm mailing list
>>>>>>>> Rio-pm em pm.org
>>>>>>>> http://mail.pm.org/mailman/listinfo/rio-pm
>>>>>>>>
>>>>>>>
>>>>>>>
>>>>>>> _______________________________________________
>>>>>>> Rio-pm mailing list
>>>>>>> Rio-pm em pm.org
>>>>>>> http://mail.pm.org/mailman/listinfo/rio-pm
>>>>>>>
>>>>>>
>>>>>>
>>>>>> _______________________________________________
>>>>>> Rio-pm mailing list
>>>>>> Rio-pm em pm.org
>>>>>> http://mail.pm.org/mailman/listinfo/rio-pm
>>>>>>
>>>>>
>>>>>
>>>>
>>>> _______________________________________________
>>>> Rio-pm mailing list
>>>> Rio-pm em pm.org
>>>> http://mail.pm.org/mailman/listinfo/rio-pm
>>>>
>>>
>>>
>>> _______________________________________________
>>> Rio-pm mailing list
>>> Rio-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/rio-pm
>>>
>>
>>
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20120601/7eac5a94/attachment.html>