降順レンジはreverse
range演算子< .. >を用いて
my $range = (10..1);
のような書き方はできない。
my $range = (1..10).reverse;
とするか、series演算子< ... >を用いて
my $range = (10,9...1);
とする。
To specify a series that counts down, use a reverse.
http://perlcabal.org/syn/S03.html#Range_and_RangeIter_semantics
Alternately, for numeric sequences, you can use the series operator instead of the range operator.