Re^2: last in a do while loop

[Hofmator]

Mmhh, I know this is just copy and pasted code, but it makes me wonder anyway - is it just me or is the code for the last example slightly strange?

LOOP: {
        do {
            last if $x = $y**2;
            # do something here
        } while $x++ <= $z;
}

• if $x = $y**2; why choose a confusing assignment instead of a normal comparison?
• Why not the explicit last LOOP? I know that it works here without it all right but I don't see the benefit of labelling the block without using the label afterwards

[davorg]

I was thinking exactly the same things as I was writing the post. I foresee a couple of patches being sent to the maintainers.