Mega Code Archive

 

Categories / Perl / Statement

 

While loop and counter

#!/usr/bin/perl $count=10; while ($count > 0) {     print "$count...\n";     $count = $count -1; }