HTMLpointHTMLpoint HTMLpoint.com


 Estilo



Hasta ahora hemos analizado un método para escribir el código de los CGI. Si os estáis preguntando si existen otros, pues bien, la respuesta es sí.
Por ejemplo, el script anterior y precisamente las líneas:
print"<body text=\"#000000\" bgcolor=\"#FFFFFF\" link= \"#0000EE\"vlink=\"#551A8B\"alink=\"#FF0000\"><p>\n";

y

print "<p>Back to <a href="\"http:\/\/vuestrositio.it\/main.html\">main</a>\n";

Seguro que os habéis percatado de que los dos están llenos de caracteres ' \ '. La teoría del Perl nos dice que este carácter sirve para que el carácter sucesivo se interprete 'a la letra', es decir, sin darle el sentido que normalmente tiene en Perl. Los que hablan inglés saben que los caracteres como "  o  "must be escaped". El sentido es el mismo, pero se utilizan otras palabras.

Dicho esto, vamos a ver cómo se pueden escribir los CGI con una sintaxis alternativa que nos va a simplificar las cosas. Analicemos, por ejemplo, el script:

#!/usr/bin/perl
print "Content-type:text/html\n\n";
print "<html><head><title>Título</title></head>";
print"<body text=\"#000000\" bgcolor=\"#FFFFFF\" link= \"#0000EE\"vlink=\"#551A8B\"alink=\"#FF0000\"><p>\n";
print "Volver al <ahref="\"http:\/\/vuestrositio.it\/home.html\">home page</a>
print"</body></html>\n";
El script, de por sí, es simple y produce una página con fondo blanco en la que hay un enlace en el índice de vuestro sitio, pero esto no os interesa. La parte más importante del script es la penúltima y la antepenúltima línea. En ellas abundan los caracteres "  e   / que, como ya hemos visto, se introducen con el carácter \ pero nueve veces sobre diez lo olvidamos y nos volvemos locos para que el script funcione.
Pues, no os queda más remedio que arreglarlo. Veamos cómo.
#!/usr/bin/perl
print "Content-type:text/html\n\n";
print <<EOF;
<html><head><title>Título</title></head>
<body text="#000000" bgcolor="#FFFFFF" link="#0000EE" vlink= "#551A8B"alink="#FF0000"><p>
Vuelve a la <ahref="http://vuestrositio.it/home.html">home page</a>
EOF
;

print "</body></html>\n";

Con este método, no tenemos que introducir continuamente los statement "print" y, sobre todo, podemos despedirnos de los caracteres\ que, tarde o temprano, olvidaremos.
Ver para creer y, sobre todo, podéis decidir cómo escribir vuestros script. No hay ninguna diferencia entre ellos porque el resultado es el mismo.


  Volver al inicio de la página