>        } else {
>        my $whileloop = 99;
>        }

Hello,

There is a scope mistaken above.You declare $whileloop at the outside of the 
loop,while here you re-declare another $whileloop with "my".This $whileloop is 
different from the former one.So "my $whileloop = 99" shouldn't change the 
switch's value which is default 0,then the loop can't get exited.
For Perl's variables scope,you may take a look at:
http://perl.plover.com/FAQs/Namespaces.html.en

Hope this useful.

--
http://home.arcor.de/jeffpang/

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to