Mega Code Archive

 

Categories / Perl / Statement

 

While statement and scalar control value

#!/usr/bin/perl -w use strict; my $countdown = 5; while ($countdown > 0) {     print "Counting down: $countdown\n";     $countdown--; }