Depuración

Ejecución de un CGI desde la Línea de Comandos

• Si estas ejecutando el script desde la línea de comandos puedes pasarle una lista de keywords o bien parejas parameter=value ya sea como argumentos o bien desde standard input. Puedes pasar keywords asi:

     my_script.pl keyword1 keyword2 keyword3
  

• o bien:

     my_script.pl keyword1+keyword2+keyword3
  

• o bien:

     my_script.pl name1=value1 name2=value2
  

• o bien:

     my_script.pl name1=value1&name2=value2
  

• Para simular un parámetro CGI multivaluado, como las entradas seleccionadas en una lista desplegable, se repite el parámetro tantas veces como sea necesario:

  my_script.pl v=a v=c v=k
  

• Si ejecutas un script que hace uso de CGI.pm desde la línea de comandos sin proporcionar ningún argumento y has activado la opción de depuración

          use CGI qw/:standard -debug/;
  

  aparecerá la línea:

  (offline mode: enter name=value pairs on standard input)
  

  y se queda esperando para que escribas los parámetros. Termina presionando ^D (^Z en NT/DOS). Si no quieres dar los parámetros a CGI.pm, presiona ^D.

     % my_script.pl
     first_name=fred
     last_name=flintstone
     occupation='granite miner'
     ^D
  

• Cuando depures, puedes usar comillas y el caracter backslash para introducir secuencias de escape y caracteres especiales. Esto permite hacer cosas como:

      my_script.pl 'name=Jorge Garcia' age=33
      my_script.pl 'name = John wiley \& Sons'
  

• Llamar al script con un número de parámetros vacío Ejemplo:

        my_script.pl ''
  

• Puedes redirigir standard input desde /dev/null o desde un fichero vacío. Ejemplo:

        my_script.pl </dev/null
  

• Si se quieren desactivar las extensiones de lectura desde la línea de comandos se puede incluir -no_debug en la lista de símbolos a importar en lalínea use. Ejemplo:

        use CGI qw/:standard -no_debug/;
  

Redirección de Errores

El módulo CGI::Carp redefine die , warn , etc. de manera que envién los mensajes etiquetados con la fecha al fichero de log. Para redirigir los mensajes de error a nuestro propio fichero de log se debe importar la función CGI::Carpout .

Para enviar los mensajes de error fatal a la ventana del navegador se usa fatalsToBrowser :

#!/usr/bin/perl
use CGI;
use CGI::Carp qw(fatalsToBrowser carpout);

open (LOG,">>/home/fred/logs/search_errors.log") ||
      die "couldn't open log file: $!";
carpout(LOG);

La función Dump

La función Dump produce una descripción HTML de los parámetros:

           print Dump

Produce algo como:

           <ul>
           <li>name1
               <ul>
               <li>value1
               <li>value2
               </ul>
           <li>name2
               <ul>
               <li>value1
               </ul>
           </ul>