Perl machen während der Schleife
# Basic syntax:
do {
code to run;
} while( condition );
# Example usage:
$i = 5;
do {
print "Value of i: $i\n";
$i += 1;
} while( $i < 10 );
# Note, do..while loops are very similar to while loops except that they
# always execute at least once
Charles-Alexandre Roy