From: Jeff Westman <[EMAIL PROTECTED]>
> Jenda,
>
> You CANNOT do what you are suggesting.
I tried it. I DID!
I don't understand what's going on. It worked fine without any
warnings/errors yesterday.
And now it does not work at all neither in Perl 5.6.1 nor 5.8.
But if I look at the CommandPrompt's history is seems it did not
print the error message but exited the perl shell (my PHS.pm):
c:\temp>psh
Welcome to psh 0.7.1 by [EMAIL PROTECTED]
Running under Perl 5.008
psh$ do {print '.';print ':';} while ($x++ < 10);
.:.:.:.:.:.:.:.:.:.:.:
psh$ do {print '.';print ':';} while ($x++ < -10);
.:
psh$ do {print '.';print ':';last} while ($x++ < 10);
.:
c:\temp>psh
Welcome to psh 0.7.1 by [EMAIL PROTECTED]
Running under Perl 5.008
psh$ do {print '.';last;print ':';} while ($x++ < 10);
.
c:\temp>
I guess I did not have enough sleep yesterday I should have noticed
this. I thought the docs mean that you can't use 'last', 'next' and
'redo' on individual do{} blocks, but that perl is clever enough to
allow you to use them in a do{} block with a 'while' modifier.
Sorry, Jenda
== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==
I wonder why the whole chemistry industry ignores
computer bugs. We all would gladly pay big bucks
for a functional insecticide.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
