Free Pascal dispone de una Unidad llamada "uncgi" que facilita la programación CGI de forma considerable. Esta unidad, entre otras cosas, permite acceder a las variables enviadas mediante los métodos GET y POST. De todas formas, nuestro primer programa no usará "uncgi", simplemente te mostrará como mostrar texto o html.
PROGRAM test;
BEGIN
{ IMPRIMER LA CABECERA QUE INDICA EL TIPO DE DOCUMENTO }
writeln('Content-type: text/html');
writeln;
{ ## TEXTO O CÓDIGO HTML DE NUESTRA PRIMERA PÁGINA ## }
writeln('<HTML>');
writeln('<HEAD>');
writeln('<TITLE>Mi primer programa…</TITLE>');
writeln('</HEAD>');
writeln('<BODY>');
writeln('Mi primer programa');
writeln('</BODY>');
writeln('</HTML>');
END.
Lo más importante del código mostrado y donde debemos prestar mayor atención es la cabecera.
Esta consiste en una línea que indica al servidor el tipo de documento que queremos mostrar y un salto de línea, o simplemente una línea vacía. La inclusión de la cabecera es imprescindible, ya que de lo contrario el servidor HTTP (Apache) no sabría como actuar.
El programa de nuestro ejemplo muestra una página de texto o HTML normal, por ello hemos indicado que el tipo de contenido es "text/html".
Free pascall y CGI
