9 lines
314 B
Perl
9 lines
314 B
Perl
#!/usr/bin/perl
|
|
|
|
use warnings;
|
|
use strict;
|
|
print "Counting up: ", (1 .. 6), "\n";
|
|
print "Counting down: ", (6 .. 1), "\n";
|
|
print "Counting down (properly this time) : ", reverse(1 .. 6), "\n";
|
|
print "Half the alphabet: ", ('a' .. 'm'), "\n";
|
|
print "The other half (backwards): ", reverse('n' .. 'z'), "\n"; |