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.