Paso a Paso

Max de Mendizabal max@acer.com.mx
Tue, 26 Aug 1997 10:30:21 -0600


perl -d
llama al modo de debugeo. Es una maravilla. Saludos
Max

At 05:24 PM 8/25/97 -0500, you wrote:
>Hola,
>
>	soy nuevo en esto de perl, pero tengo la necesidad de hacer unos
>programas en este lenguaje, solo que me esta pasando algo estra#o, tengo
>una variable llamada $window, despues de que se le asigna el valor la
>imprimo y funciona bien, pero un poco mas abajo en el probrama el valor
>de esta variable es -1, esto si que sea modificada por el programa.
>
>el programa va mas o menos asi:
>
>    if (/win ([0-9]*) /) {
>    $window = $1;
>print " Win $window ";
>    } else {
>    $window = -1;
>    }
>    if (/ack ([0-9]*) /) {
>        $ack = $1;
>        if ($lastndx) {
>            $ack -= $firstseq[0];
>        } else {
>            $ack -= $firstseq[1];
>        }
>    } else {
>        $ack = -1;
>    }
>
>    if ($lastndx eq 0){
>        print $frompl "darrow $time $sendseq\n";
>        print $frompl "uarrow $time $sendseqlast\n";
>        print $frompl "line $time $sendseq $time $sendseqlast\n";
>    }
>
>    if (($ack != -1) && ($lastndx eq 1)){
>print " Win $window ";            <---------- Aqui ya me imprime -1
>print "Ack $ack ";
>
>...
>
>	Alguna idea? es posible corres un programa paso paso
>
>Saludos
>__________________________________________________________________
>
>     Marco A. Mora Arvizo                 \ _ /
>   <mora@gdl.cinvestav.mx>              -= (_) =- Telecomunicaciones
>                                          /   \ Cinvestav-Guadalajara
>     .\//\/.         ,\/,   ,\/.//,                     ,~
>     /o//o\\ ,.,.,   //o\   /o\\o\\                     |\
>      |  |  /###/#\    |     |  |                      /| \
>      |  |  |' '|:|    |`=.='|  |                     /_|__\
> ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^""""""""""~~~~~~~~~~~~~~~~~~
>___________________________________________________________________
>