#!/usr/bin/perl-w
use CGI;
my $q = new CGI;
# load CGI routines
# create new CGI object
print $q->header;
# create the HTTP header
$q->start_html('hello world');
# start the HTML
$q->h1('hello world');
# level 1 header
$q->end_html;
# end the HTML
--------------------------------
el programa anterior no me funciona y no se porque, me muestra el siguiente error:
Internal Server Error
The server encountered an internal error or misconfiguration and was unable to complete your request.
Please contact the server administrator, [email protected] and inform them of the time the error occurred, and anything you might have done that may have caused the error.
More information about this error may be available in the server error log.
NOTA: Revisé el archivo LOG y este fué el error asociado, sin embargo sigo sin entender
[Tue Aug 09 16:51:55 2005] [error] 2564: ModPerl::Registry: Can't locate object method "FILENO" via package "Apache::RequestRec" at C:/indigoperl/perl/lib/CGI.pm line 709.
Compilation failed in require at C:/indigoperl/apache/perl-bin/cgip.pl line 2.
BEGIN failed--compilation aborted at C:/indigoperl/apache/perl-bin/cgip.pl line 2.
Les agradecería su pronta ayuda, hasta luego y Buenas Tardes!!
Haroldo Zavala