Perl-system como cgi....

Salvador Fernandez Barquin sferbar@acnet.net
Fri, 14 Nov 1997 18:16:04 -0600


Hola lista, pues un problemita en un script en perl en mi
linux necesito que la salida de system salga en la salida 
estandar para que se convierta en una página dinámica...

Al estilo
------------------------------------------------------
#!/usr/bin/perl

use CGI ':standard';

print header;
print start_html;

$nombre=param('nombre');
$edad=param('edad');
$cal=param('cal');

print $nombre, $edad, $cal;

system ('/bin/cat /etc/passwd'); >>> ***
*** aqui falla no sale nada en el navegador pero si
    en la linea de comandos.

print end_html; 
--------------------------------------------------------

Pues mi propósito es pasarle parámetros de una forma a
el SWI-Prolog para que alucine y cree el por programa
páginas dinámicas.

Este script me sirve pero tiene limitantes que quiero solventar
con perl.

#!/bin/sh

echo "Content-type: text/html"
echo
echo
base=/home/httpsd/cgi-bin
PL=/usr/local/bin/pl

exec $PL -f none -g "load_files(['$base/ejem1'],[silent(true)])" -t run
-
- $*

Ciertamente esto me funciona bien, pero quiero que este script este en
Perl para poder pasarle parámetros utilizando las funciones del CGI.pm
por su facilidad y bueno la capacidad que tengo de manejar base de
datos como postgres.

Saludos
        Salvador.