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
广告