<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.18928">
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT size=2 face=Arial>Complementando meu email anterior e respondendo ao
e-mail do Andre,</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Realmente o código que eu mandei esta incorreto. No
e-mail anterior eu acredito ter mandado o correto agora. Bom quanto a versão do
Perl vou tentar atualizar para ver se ajuda de alguma forma. Quanto a questão de
pacotes, sim nas primeiras vezes que eu tentei rodar o script varios problemas
de falta de pacotes foram aparecendo e eu mandei bala no apt-get ate que parou
de dar erros e o script rodou até o final. Portanto nenhum erro é apresentado em
tela, simplesmente o arquivo database.json permanece em branco.</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Vou tentar as alterações propostas pelos colegas da
lista e retorno se funcionar.</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Mais uma vez obrigado.</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Walter</FONT></DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="FONT: 10pt arial; BACKGROUND: #e4e4e4; font-color: black"><B>From:</B>
<A title=andregarciacarneiro@gmail.com
href="mailto:andregarciacarneiro@gmail.com">Andre Carneiro</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A title=saopaulo-pm@mail.pm.org
href="mailto:saopaulo-pm@mail.pm.org">saopaulo-pm@mail.pm.org</A> </DIV>
<DIV style="FONT: 10pt arial"><B>Cc:</B> <A title=saopaulo-pm@pm.org
href="mailto:saopaulo-pm@pm.org">saopaulo-pm@pm.org</A> </DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Wednesday, June 16, 2010 11:51
AM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [SP-pm] Problemas com JSON e
PERL</DIV>
<DIV><BR></DIV><BR><BR>
<DIV class=gmail_quote>2010/6/16 Walter Silvestre Coan <SPAN dir=ltr><<A
href="mailto:w.coan@terra.com.br">w.coan@terra.com.br</A>></SPAN><BR>
<BLOCKQUOTE
style="BORDER-LEFT: #ccc 1px solid; MARGIN: 0px 0px 0px 0.8ex; PADDING-LEFT: 1ex"
class=gmail_quote>
<DIV bgcolor="#ffffff">
<DIV><FONT size=2 face=Arial>Bom dia,</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Estou tentando adaptar uma aplicação chamada
ScriptLattes (<A href="http://scriptlattes.sourceforge.net/"
target=_blank>http://scriptlattes.sourceforge.net/</A>). Ele é uma aplicação
escrita em Perl com o objetivo de realizar o download dos dados da
Plataforma Lattes, que são curriculos academicos de alunos e
professores. Uma das novas funcionalidades desse script é que os dados
baixados são salvos em um arquivo .json, possibilitando serem importados
para outros formatos ou até bancos de dados. O problema é que quando eu rodo
esse script no meu ambiente (Ubuntu 8.4 server). Ele simplesmente gera o
arquivo .json em branco (apesar do script realizar as outras tarefas
corretamente). O autor do script me ajudou e fez alguns testes, e no
computador dele esta funcionando perfeitamente, gerando os dados no formato
json. Acredito que o problema esteja no meu ambiente, porém eu ja baixei
vários pacotes referentes ao PERL e ao JSON mas nada de funcionar.
</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>O codigo que gera o arquivo basicamente é
esse:</FONT></DIV>
<DIV><FONT size=2 face=Arial>sub createJsonFile<BR>{<BR> # Arquivo JSON
contendo todas as produções do grupo.<BR> # Este arquivo pode ser
utilizado para popular bancos de dados.<BR></FONT></DIV></DIV></BLOCKQUOTE>
<DIV><BR></DIV>
<DIV>Isto não deveria estar descomentado e com um ';' no final, e sendo
atribuído a alguma variável??? </DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #ccc 1px solid; MARGIN: 0px 0px 0px 0.8ex; PADDING-LEFT: 1ex"
class=gmail_quote>
<DIV bgcolor="#ffffff">
<DIV><FONT size=2
face=Arial> #to_json($allInfoByType)<BR></FONT></DIV></DIV></BLOCKQUOTE>
<DIV><BR></DIV>
<DIV> </DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #ccc 1px solid; MARGIN: 0px 0px 0px 0.8ex; PADDING-LEFT: 1ex"
class=gmail_quote>
<DIV bgcolor="#ffffff">
<DIV><FONT size=2 face=Arial> open(JSONFILE,
">$outputDir/database.json");<BR> eval <BR> {
<BR> print JSONFILE lenght($allInfoByType);
<BR> };<BR> close(JSONFILE);<BR>}</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT></DIV></DIV></BLOCKQUOTE>
<DIV><BR></DIV>
<DIV>Até aqui blz. Mas database.json tem conteúdo? Se não tiver o teu script
não vai gravar nada em <SPAN style="FONT-FAMILY: Arial"
class=Apple-style-span>$allInfoByType</SPAN>, concorda?</DIV>
<DIV><BR></DIV>
<DIV> </DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #ccc 1px solid; MARGIN: 0px 0px 0px 0.8ex; PADDING-LEFT: 1ex"
class=gmail_quote>
<DIV bgcolor="#ffffff">
<DIV> </DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Alguns dados:</FONT></DIV>
<DIV><FONT size=2 face=Arial>Perl versão 5.8.8</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT></DIV></DIV></BLOCKQUOTE>
<DIV><BR></DIV>
<DIV><BR></DIV>
<DIV>Alguma chance de você atualizar isso para 5.10 pelo menos? Não que tenha
a ver com o problema(não necessariamente)...</DIV>
<DIV><BR></DIV>
<DIV> </DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #ccc 1px solid; MARGIN: 0px 0px 0px 0.8ex; PADDING-LEFT: 1ex"
class=gmail_quote>
<DIV bgcolor="#ffffff">
<DIV> </DIV>
<DIV><FONT size=2 face=Arial>Pacotes instalados:</FONT></DIV>
<DIV><FONT size=2 face=Arial><A href="mailto:waltercoan@ldubuntuserver:~$"
target=_blank>waltercoan@ldubuntuserver:~$</A> dpkg --get-selections | grep
-i
json<BR>libjson-any-perl install<BR>libjson-perl install</FONT></DIV>
<DIV> </DIV></DIV></BLOCKQUOTE>
<DIV><BR></DIV>
<DIV>Humm , Ok! você instalou uma porrada de coisa. Mas perl reclama de
módulo(s) faltando? Ou o S.O. reclama de alguma coisa?</DIV>
<DIV><BR></DIV>
<DIV>Vc tem alguma dificuldade com o CPAN, ou simplesmente prefere instalar
coisas via dpkg ? Eu só uso apt-get/dpkg como último recurso(módulos com
dependências chatas de resolver, normalmente), no caso de módulos Perl.
Primeiro porque com o CPAN, tem-se o módulo compilado na máquina, e
configurado nos locais configurados para o perl corretamente. Eu não tenho
como garantir isso instalando via apt/dpkg(ou tô falando besteira), por isso
pergunto novamente se Perl está reclamando de módulos faltantes?</DIV>
<DIV><BR></DIV>
<DIV><BR></DIV>
<DIV>Mais detalhes do problema, por favor. Mensagens de erro se
possível...</DIV>
<DIV> </DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #ccc 1px solid; MARGIN: 0px 0px 0px 0.8ex; PADDING-LEFT: 1ex"
class=gmail_quote>
<DIV bgcolor="#ffffff">
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Obrigado,</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Walter Coan</FONT></DIV>
<DIV><FONT size=2 face=Arial><A href="mailto:w.coan@terra.com.br"
target=_blank>w.coan@terra.com.br</A></FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2
face=Arial></FONT> </DIV></DIV><BR>_______________________________________________<BR>SaoPaulo-pm
mailing list<BR><A
href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</A><BR><A
href="http://mail.pm.org/mailman/listinfo/saopaulo-pm"
target=_blank>http://mail.pm.org/mailman/listinfo/saopaulo-pm</A><BR></BLOCKQUOTE></DIV><BR><BR
clear=all><BR>-- <BR>André Garcia Carneiro<BR>Analista/Desenvolvedor
Perl<BR>(11)82907780<BR>
<P>
<HR>
<P></P>_______________________________________________<BR>SaoPaulo-pm mailing
list<BR>SaoPaulo-pm@pm.org<BR>http://mail.pm.org/mailman/listinfo/saopaulo-pm</BLOCKQUOTE></BODY></HTML>