do {
block
}
Executes the sequence of commands in
the
block
and returns the value of the last
expression evaluated.
When modified by a loop modifier, Perl
executes the
block
once before testing the loop
condition. (On other statements, the loop modifiers test the
conditional first.)