Perl序号数组

Perl提供了用于顺序数字和字母的快捷方式。例如，当计数到100时，不必键入每个元素，而是可以执行以下操作：

示例

#!/usr/bin/perl
@var_10 = (1..10);
@var_20 = (10..20);
@var_abc = (a..z);
print "@var_10\n";  # Prints number from 1 to 10
print "@var_20\n";  # Prints number from 10 to 20
print "@var_abc\n"; # Prints number from a to z

这里的双点(..)称为范围运算符。这将产生以下结果-

1 2 3 4 5 6 7 8 9 10
10 11 12 13 14 15 16 17 18 19 20
a b c d e f g h i j k l m n o p q r s t u v w x y z