Jump to content


Photo

Localização Do Perl No Script


  • Faça o login para participar
2 replies to this topic

#1 Fredera

Fredera

    Normal

  • Usuários
  • 78 posts
  • Sexo:Não informado

Posted 13/12/2005, 10:23

Fala pessoal...
após um longo e tenebroso inverno sem mecher com perl estou devolta... com mais dúvidas do que nunca...hehehe, acho que ninguém lembra mais de mim...talvez o prix que me ajudava mais... ou nao..hehehehe

Seguinte.....Antes meu PERL rodava em servidores windows, agora migramos todos os servers da empresa para LINUX e estou com uma pequena dúvida...

eu tentei usar a linha para localizar o perl:

#!/usr/bin/perl

mas ele dá o seguinte erro:

[Tue Dec 13 11:18:36 2005] [error] [client 172.16.4.8] Premature end of script headers: /var/www/htdocs/web/tmg/cgi-bin/login.pl

pois bem... daí eu não sei porque resolvi colocar o -w
ficando:
#!/usr/bin/perl -w

e não é que funcionou...rs...
mas eu estava lendo no help do perl e o -w é pra habilitar os warnings no log... o que tem isso a ver em relação a funcionar ou nao???
Algúem teria alguma sugestão?

Abraços a todos!!!!

Edição feita por: Fredera, 13/12/2005, 10:24.

"A humanidade está perdendo seus maiores gênios...
Aristóteles já morreu a séculos, Newton bateu as botas faz tempo, Einstein morreu, e eu não tô passando muito bem... " rs

#2 prix

prix

    Duracell: E Duram, Duram, Duram...

  • Usuários
  • 562 posts
  • Sexo:Não informado
  • Interesses:keep walking ...
    jonny walker

Posted 13/12/2005, 17:49

#!/usr/bin/perl -w

use CGI::Carp qw(fatalsToBrowser);


print join'',(reverse  map{/d([a-z])d/}split/W/,'$5x6@314&60f%3i4#moo^1r2#moo^1p2')," ", pack ("B*",'01110000011001010111001001101100')," ", pack ("B*",'011011010110111101101110011010110110010101111001'), "n";
sleep 5;


E-Mails, topicos ou mensagens privadas não serão respondidas a menos que eu considere uma relevancia/necessidade na mesma.

#3 jgcl

jgcl

    João Gabriel C. Laass, Serra/ES

  • Usuários
  • 559 posts
  • Sexo:Não informado
  • Localidade:Serra / ES
  • Interesses:Tudo!

Posted 14/12/2005, 15:42

warnings no log é quando o perl grana no error.log do apache qual erro ocorreu durante a execução do scripts.

se você usar -w e
use CGI::Carp qw(fatalsToBrowser);
os erros serão gravados no error.log e exibidos na tela de seu navegador.

esse erro que deu, possivelmente é erro de cabeçalho...

flw
João Gabriel
Site >> joaogabriel.org
CGiClube.net >> http://www.cgiclube.net
Vitória Perl Mongers >> http://vitoria.pm.org




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq