Este artículo va dirigido a todos aquellos que no han trabajado nunca con CGI en Perl, un CGI es una aplicación de lado de servidor que al ser solicitada se ejecuta y envía su resultado al navegador del visitante.
A continuación, podéis ver un ejemplo básico en Perl para que os familiaricéis con su sintaxis:
Hola mundo.pl
#!/usr/bin/perl
$titulo = "Programacion Web - Ejemplo";
$texto = "Hola mundo";
print "content-type: text/htmlnn";
print "<head>n";
print "<title>$titulo</title>n";
print "</head>n";
print "<body>n";
print $texto;
print "</body></HTML>n";
La primera línea del codigo (#!/usr/bin/perl), nos define la situación del interprete Perl, esta dirección cambiará segun la configuracion del servidor aunque por lo general será /usr/bin/perl, así como también, la extensión del archivo podra variar entre .pl, .cgi...
Seguidamente definimos dos variables que nos indicarán el texto y título de la página y finalmente empezamos a enviar nuestra página al navegador.
Para enviar contenido usamos la función print, y empezamos enviando los encabezados de la página, que indicarán al navegador que tipo de contenido mostrar:
print "content-type: text/htmlnn";
Seguidamente enviamos el resto de contenido de la página teniendo en cuentra que cada instrucción debe finalizar con punto y coma (;).
Artículo por cortesía de Eloi de San Martín
Usuarios que han visto este tema también han visto...
- Trabajar con archivos en Perl
- Enviar email con Windows en Perl
- Variables y estructura de los datos en Perl
- Leer dimensiones de imágenes en Perl
- Qué es Perl
Información legal | Política de Privacidad | Contacte con nosotros
Otro proyecto de Factoría de Internet. Copyright© 2003-2008 Factoría de Internet S.L.. Todos los derechos reservados.