Perl序列的数字与前导零

Question

是否有一些简单的方法(没有sprintf,当然,还有printf)获得(001, 002, ... 100)Perl 的列表？在bash中它就像是seq -w 1 100.Perl怎么样？

Answer 1

你的意思是这样的？

for ('001'..'100') {
    print "$_\n";
}

.. 在一个范围内,返回一个按值计数的值列表,从左值到右值.

有关如何使用范围的更多详细信息,请参阅: Perldoc范围运算符和此链接

Answer 2

Printf 就是为了解决此类问题而创建的。使用它可以帮助您更快地获得所需的答案。

foreach my $number ( 1 .. 100 ) {
     printf "%03d\n", $number;
}

是%“开始格式序列” 是0“前导零” 是3“最少三位数字” 是d“将参数视为数字（整数）”