Recebi da Dicas-L

Utilizando Javascript para retorno em CGIs
---------------------------------------------------------------------
Colaboração: "Charles Roberto Pilger" [CHARLES@helios.unisinos.br]

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(Ólá, usuário do computador $ip.')";   
 exit;   
}

---------------------------------------------------------------
---------------------------------------------------------------