- or download this
while (EXPR) {
REDO:
...
#body of next block
}
LAST:
- or download this
NEXT: while (EXPR) {
REDO:
# body of while block
}
LAST:
- or download this
# nb this is stupid code that shortens lines (a char at a time)
# and prints the result, until it finds a z at the first pos.
...
}
}
print "done";