Ola gente!!!
Galera to com um probleminha,
#!/usr/bin/perl -wT
use CGI;
$q=new CGI;
$arq=$q->param("pesquisa");
print CGI::header(), "<HTML><BODY>";
open (FILE, ">$arq") || &error("nao gravou"); #existe uma sub error.
print "passei pela abertura";
print FILE "test";
close FILE;
.
.
.
Se eu executo este (super)script ele nao da erro "nao gravou" e nem imprime
"passei pela abertura"
ele simplesmente aborta antes, ou no, open(), nao sei exatamente onde...
***Solucao deixar #!/usr/bin/perl -w (sem o T)
dai ele funciona e faz o arquivo normalmente....
Porque quando esta com o -T ele nao faz o arquivo??? E nem da erro e nem
mostra nada???
agradeco qualquer ajuda! Obrigado!
falow galera...
__
/ \ Thiago Ordine Rodrigues
\ / [EMAIL PROTECTED]
\ /
X ASCII RIBBON
/ \ Against HTML e-mail
/ \
http://www.mrweb.com.br/perl/
=======================================
>>No site da lista, voce tera tudo sobre PERL,
>>LINUX, PHP, ASP e informacoes, cadastramento
>>e descadastramento da Lista.
=======================================
