Mega Code Archive

 

Categories / Perl / Statement

 

Until statement

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