RE: [perl #2215] redo undefines variables declared like while (my$i ...) { redo; }

Dave Mitchell wrote:
> > If your interpretation of this is correct then I think the documentation
> > should be changed to clarify the point. I wouldn't have expected this
result
> > from that description. In fact that description makes me think that
> > 
> >   my @a=(2..5);
> >   while (my $x=shift @a) {
> >       print $x,"\n";
> >       redo if $x--;
> >    }
> > 
> > and
> > 
> >   my @a=(2..5);
> >   while (my $x=shift @a) {
> > 	STARTBLOCK:
> >       print $x,"\n";
> >       goto STARTBLOCK if $x--;
> >    }
> > 
> > should be equivelent, but by your reading they aren't.
> 
> I'm with Yves on this one.

It occurred to me that there is another reason to not agree with the
proposed interpretation. It means that redo in for loops and while loops do
different things:

  my @a=(2..5);
  for my $x (@a) {
    print $x,"\n";
    redo if $x--;
  }

In this case the $x doesn't suddenly become undef after the redo.... 

IMO the reported bug is indeed a bug. 

Cheers,
Yves

• RE: [perl #2215] redo undefines variables declared like while (my$i ...) { redo; } by Orton, Yves
• Re: [perl #2215] redo undefines variables declared like while (my $i ...) { redo; } by Dave Mitchell
• [perl #2215] redo undefines variables declared like while (my $i ...) { redo; } by Steve Peters via RT
• [perl #2215] redo undefines variables declared like while (my $i ...) { redo; } by Steve Peters via RT
• RE: [perl #2215] redo undefines variables declared like while (my$i ...) { redo; } by Orton, Yves