Es de humanos equivocarse, más sin en cambio, es sublime perdonar. Albertano Santacruz
Debugging en Perl
2010-02-05 12:14:21-06
General
PTKDB DEBUGGER- Instalación para DEBIAN/UBUNTU
ptkdb es un debugger para Perl que utiliza la libreria Perl/Tk.
Primero tenemos que instalar la libreria Tk desde CPAN
Paso 1. #perl -MCPAN -e "install Tk"
Descargamos el código de PTKDB
Paso 2. $wget http://sourceforge.net/
Descomprimir el archivo:
Paso 3. $tar -xvzf Devel-ptkdb-1.1092.tar.gz
Entramos a la carpeta y compilamos el archivo:
paso 4. $cd Devel-ptkdb-1.1092/
paso 5. #perl Makefile.PL
paso 6. #make
paso 7. #make install
Probamos que se ha instalado correctamente:
paso 8. perl -d:ptkdb -e 1
PTKDB DEBUGGER- Pruebas del debugger para un script CGI
==============================
1.- Para ello necesitamos un script de pruebas cómo el siguiente: (Lo que está en negritas es obligatorio)
#!/usr/bin/perl -d:ptkdb
#File: /var/www/test.pl
sub BEGIN {
$ENV{'DISPLAY'} = ":0.0";
}
$|++;
print "Content-type: text/html\n\n";
print "<PRE>";
for (my $i=0; $i<10; $i++)
{
print "Count $i\n";
}
print "</PRE>\n";
Guardamos el script en el webroot de apache y le damos permisos de ejecución
2.- Agregamos localhost a la lista de control de acceso de XHOST
$xhost localhost
3.- Ejecutamos el script desde el navegador:
$firefox http://localhost/test.pl
Permalink: http://mononeurona.org/entries/view/rnstux/2080
Comentblogs:









