To be honest, I'm totally lost in what you are saying up to "The best way I know to express the loop-and-a-half is:" ... from there on, I'm with you 100%. and you're right, this...

while (1) {
     S;
     last if (B);
     T;
}
[download]

...is a perfectly valid way of expressing the construct in Perl(5). But I'd like something:

• That doesn't require an explict "last" or "goto" inthe condition test
• that has less neccessary syntactic cruft (ie: the "(1)" on the while, and the "if" in the condition test
• forces S and T to be seperate scopes -- admitadly, this is just my own personal view on what *seems right* ... other people may not feel hat adds any value

hence my desire to have...

do {
     S;
} while (!B) {
     T;
}
[download]

...in perl5, which when S or T are No-Ops, breaks down to either...

do {
     S;
} while (!B);
# OR
while (!B) {
     T;
}
[download]

but the meaning of "do" changes in P6, hence...

loop {
     S;
} while (!B) {
     T;
}
[download]