<div dir="ltr"><div><div><div><div><div>Alisson,<br><br></div>Pode mostrar o código que você está usando ?<br></div>Está usando DBIx::Class ?<br></div>ou DBI puro ?<br><br></div>de qualquer maneira, não sei se vc está usando mas caso não esteja pode tentar usar o Data::Printer pra debugar teu problema...<br>
<br>perl -e 'use Data::Printer; my @bla = (qw|aa bb cc|); warn p @bla;' <br></div><br><br><br><div><div><br></div></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2014-08-27 18:15 GMT-03:00 Allisson Andrade Lima <span dir="ltr"><<a href="mailto:allissonlima1@gmail.com" target="_blank">allissonlima1@gmail.com</a>></span>:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Olá,<div><br></div><div>Gostaria de compartilhar e tentar identificar a causa de um problema que estou passando em um Script que estou escrevendo em Perl.</div>
<div><br></div><div>Este Script realiza a execução de uma Stored Procedure em um banco DB2 e importa os dados para um banco Mysql. Realizo um fetcharray e vou percorrendo linha a linha, tratando as colunas e adicionando em um array. O problema é que caso haja um campo NULL no resultado eu não tenho um retorno undef. A variável inicialmente não possui valor, mas caso eu faça um length eu tenho um retorno com um valor acima de zero, logo ela também não fica undef. </div>


<div><br></div><div>Com esse problema eu não estou conseguindo tratar esses casos para campos com valor nulo. Gostaria que alguém me ajudasse caso saibam o que pode estar acontecendo.<br></div><div><br></div><div>Fico feliz pela ajuda,</div>


<div><br></div><div>Allisson Lima</div></div>
<br>_______________________________________________<br>
Salvador-pm mailing list<br>
<a href="mailto:Salvador-pm@pm.org">Salvador-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/salvador-pm" target="_blank">http://mail.pm.org/mailman/listinfo/salvador-pm</a><br>
<br></blockquote></div><br></div>