Utilizando Javascript para retorno em CGIs

Colaboração: Charles Roberto Pilger

Data de Publicação: 31 de Maio de 2000

Uma solução interessante para quem quer utilizar recursos de script embutidos em páginas e não pode utilizar a diretiva exec no Server Side Include (SSI) consiste em fazer um script que retorne um código em JavaScript para o browser, que o executará.

Para executar tal script basta adicionar a seguinte linha no html de sua página:

  <SCRIPT LANGUAGE="javascript" SRC="/cgi-bin/jscript.js"></SCRIPT> 

que irá retornar a seguinte mensagem:

  Olá, usuário do computador 10.21.211.6. 

Detalhe importante: Repare que a extensão do aplicativo CGI é js. Isso é muito importante, pois se não possuir tal extensão a tag SCRIPT não funcionará direito. Assim sendo, é importante que o seu servidor web não tenha qualquer restrição de execução de aplicativos dentro do diretório cgi-bin.

Segue abaixo o código-fonte desse script em Perl:

  #!/usr/bin/perl
  # Script  : jscript.js
  # Versão  : 1.0
  # Função  : retorna uma mensagem utilizando uma chamada javascript
  # Criação : Marina Simon Becker e Charles Roberto Pilger      
  # Histórico                           
  # 2000/05/14: Criação do script                                     
  #
  # INSTRUÇÕES DE USO:                                     
  #
  # Para usar este script,  simplesmente adicione a seguinte tag na sua
  # página
  #  
  # <SCRIPT LANGUAGE="javascript"  SRC="/cgi-bin/jscript.js"></SCRIPT>
  #        
  # COPYRIGHT:                                             
  #                                            
  # Esse script utiliza a GPL - GNU General Public License. Maiores
  # informações podem ser   obtidas em 
  #    http://www.gnu.org/copyleft/gpl.html . 
  # Assim sendo, se desejas mudar este script e repassá-lo, sinta-se
  # livre para fazê-lo, desde  que mantendo o código-fonte do mesmo
  # disponível para os outros.
  #
  
  MAIN: {
   $ip = $ENV{'REMOTE_ADDR'};
   print "Content-type: text/html\n\n";
   print "document.writeln("Olá, usuário do computador $ip.')";   
   exit;   
  }