Mega Code Archive

 

Categories / Perl / System Functions

 

The sleep command puts your process to sleep for a number of seconds

#!/usr/bin/perl -w use strict; my @count = (1..5); foreach (reverse(@count)) {     print "$_...\n";     sleep 1; } print "BLAST OFF!\n";