Mega Code Archive

 

Categories / Perl / Statement

 

Do while statement

#!/usr/bin/perl -w use strict; my $i = 1; print "starting do...while:\n"; do {     print "    the value of \$i: $i\n";     $i++; } while ($i < 6);