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\\ |\
> | | /###/#\ | | | /| \
> | | |' '|:| |`=.='| | /_|__\
> ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^""""""""""~~~~~~~~~~~~~~~~~~
>___________________________________________________________________
>