programming-examples/perl/Array/use reverse on arrays as well as lists.pl

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