<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman, new york, times, serif;font-size:12pt"> Oi amigos, boa noite.<br> É o seguinte :<br><br> package supplier;<br> print $main::TEST;<br><br> Resulta em :<br><br> Use of uninitialized value in print at /home/daniel/bin/inquiry-server-2/Inquiry.pm line 64<br><br> Porém :<br><br> package supplier;<br> sub teste{<br> print $main::TEST;<br> }<br><br> Funciona normalmente, imprime o valor da variável TEST que é declarada via Getopt no script principal.<br><br> A diferença que eu vejo é que no primeiro caso a tentativa de usar a variável está no escopo global do package (que é o que eu quero, declarar um hash
dependendo da condição $main::TEST) e no segundo caso dentro de uma sub.<br> O package supplier está dentro de um .pm separado do script principal.<br> Minha dúvida é : Como consigo enxergar a variável de um outro namespace no escopo global do package ?<br> Teria eu que exportar o TEST no script principal para este package ou vice-versa (importar o TEST no package supplier) ?<br> Obrigado novamente, um abraço.<br>
<br></div><br>
<hr size=1>Novo <a href="http://yahoo.com.br/oqueeuganhocomisso ">Yahoo! Cadê?</a> - Experimente uma nova busca. </body></html>