Erro em IF

marciobrignol
(usa Debian)

Enviado em 18/02/2008 - 11:15h

Olá pessoal.. Estou desenvolvendo uma aplicação em perl. Está quase pronta, pois existe um erro que ta me matando. O erro é em um IF. Faço consuta ao banco de dados, testo se o campo ta vazio para fazer uma concatenação em uma string. Porém quando o campo vez vazio da o seguinte erro: "Use of uninitialized value in string eq". Alguém pode me dar uma luz?

Segue codigo abaixo:
foreach $j (2..44){
print $clifi[$j]."\n";
if ($clifi[$j] eq ""){
$str_cliente .= '^';
}else{
$str_cliente .= '^'.$clifi[$j];
}
}

Aguardo Contato

karioka_pr
(usa Slackware)

Enviado em 22/02/2008 - 17:24h

tente substituir o vazio por um \NULL no banco e no script e tratar. Creio que será mais fácil de resolver.