- or download this
In list context, it returns a list of values counting (up
by ones) from the left value to the right value. If the
left value is greater than the right value then it returns
the empty list.
- or download this
#!/usr/bin/perl -w
...
my @range = ('e' .. 'd');
printf "%s\n", join(" ", @range);
- or download this
e f g h i j k l m n o p q r s t u v w x y z
- or download this
#!/usr/bin/perl -w
...
letters();
letters();
letters();
- or download this
a b c d e f
A B C D E F
A B C D E F
- or download this
$letter = uc $letter;
- or download this
sub letters {
foreach my $letter ('a' .. 'f') {
...
a b c d e f
a b c d e f
a b c d e f
- or download this
sub letters {
my @letters = ('a' .. 'c', 'd' .. 'f');
...
a b c d e f
a b c d e f
a b c d e f