Mega Code Archive

 
Categories / Perl / Statement
 

Using the dowhile repetition structure

$counter = 1; do  {    print "$counter "; } while ( ++$counter <= 10 ); print "\n";