Tecnología

Inicio

Cómo cambiar la barra de título de secuencias de comandos en Perl

October 6

Cómo cambiar la barra de título de secuencias de comandos en Perl


El lenguaje de programación Perl es uno de los lenguajes de programación interpretados más utilizados para la creación de páginas web dinámicas. Utilizando Perl, los programadores pueden alterar las interfaces de usuario página Web de muchas maneras, por ejemplo, cambiando las etiquetas HTML específicas, tales como la etiqueta "<title>". scripts de Perl se ejecutan en el servidor web, por lo que requieren que los datos se ha publicado en el servidor web con el fin de modificar dinámicamente los elementos de página. Afortunadamente, Perl ofrece funciones integradas que hacen que la recuperación de la información publicada fácil.

Instrucciones

1 Abra un editor de texto y crear un archivo llamado "perlTitle.pl". Agregue la línea "tinglado" al archivo en la primera línea. El "shebang" especifica la ubicación intérprete Perl en el caso de que no se puede encontrar. La línea "tinglado" será diferente en función de la instalación específica Perl. Un ejemplo se muestra a continuación:

! / usr / local / bin / perl

2 Indican que debe perlTitle.pl salida de una página Web ( "text / html") imprimiendo el valor "Content-type" "text / html" (incluir el "\ n \ n" caracteres). Para imprimir los resultados, utilice el comando de Perl "imprimir" e imprimir una abierta y una "<html>" etiqueta de cierre a la página Web.

print "Content-type: text / html \ n \ n";
print "<html>";
print "</ html>";

3 Recuperar los valores de la cadena de consulta. Los valores de cadena de consulta "" son los valores presentados en la página web. En este ejemplo, el valor en la cadena de consulta será el título utilizado para cambiar la barra de título. Almacenar los valores de cadena de consulta en una variable llamada "$ keyValue" declarada entre perlTitle.pl de "<html>" y "etiquetas </ html>":

$ KeyValue = ($ ENV { 'QUERY_STRING'});

4 Utilice la función de Perl "split" para dividir la cadena de consulta en dos valores ($ clave y valor $), la colocación de la división inmediatamente inferior a la declaración "$ keyValue". En este ejemplo, $ clave es el nombre de la cadena de título ( "title") y el valor de $ es el valor de la cadena de título. Utilice el carácter "=" para dividir la cadena "$ keyValue":

($ Name, $ value) = split (/ = /, $ keyValue);

5 Utilice el comando de Perl "imprimir" para imprimir el "valor $" variable a la página Web. Incluya el valor de la variable entre abierto "<title>" y cerrar "</ title>" etiquetas HTML:

print "<title> $ valor </ title>";

6 Utilice el comando de Perl "imprimir" para imprimir una etiqueta "<form>" a la página Web. Dar forma al tipo de método "get" y el valor de acción "perlTitle.html". Imprimir un cierre "</ form>" etiqueta para completar el formulario que el usuario tendrá que presentar:

print "<form method =" get "action = 'perlTitle.pl'>";
print "</ form>";

7 Utilice el comando de Perl "imprimir" para imprimir una etiqueta HTML "<input>" campo a la página Web. Dar el campo de entrada el valor "tipo" "texto", el "nombre" valor "título" y cerrar la etiqueta "</ input>". Utilice el comando de Perl "imprimir" para imprimir una segunda HTML "<input>" a la página web con un valor "tipo" en "enviar". Coloca los dos "imprimir" comandos entre el "<form>" y "</ form>" etiquetas y guardar y perlTitle.pl cercanos. Después del paso 7, perlTitle.pl aparecerá como se muestra a continuación:

! / / / Bin / perl locales usr

print "Content-type: text / html \ n \ n";
print "<html>";
$ KeyValue = ($ ENV { 'QUERY_STRING'});
($ Name, $ value) = split (/ = /, $ keyValue);
print "<title> $ valor </ title>";
print "<form method =" get "action = 'perlTitle.pl'>";
print "<input type =" text "name =" title "> </ input>";
print "<input type =" submit ">";
print "</ form>";
print "</ html>";

8 perlTitle.pl abiertas en un navegador web. Escriba un valor en el campo de entrada, haga clic en el botón de envío, y verificar que el título de la página Web se actualiza correctamente.

Consejos y advertencias

  • información del formulario se puede enviar a los scripts de Perl utilizando el método "post". Este método no incluye los datos del formulario como argumentos en la URL, y es más seguro que el método "get".
  • Perl tiene una variedad de potentes capacidades de manipulación de texto y un ciclo de desarrollo rápido.
  • CPAN ofrece miles de módulos Perl que permiten a los desarrolladores para llevar a cabo prácticamente cualquier tarea sin duplicar código.
  • Considerar la adición de un valor predeterminado a los campos de entrada que se llevan a la entrada del usuario en el caso de que el usuario no introduce ninguna información.
  • La mayoría de los atributos del navegador se basan en las preferencias del usuario y la configuración del sistema y no pueden o no deberían cambiarse de forma dinámica.