Perl前導零的數字序列

Question

是否有一些簡單的方法（沒有sprintf，當然，還有printf）在Perl中獲得(001, 002, ... 100)的列表？ 在bash中，它類似於seq -w 1 100。 Perl怎麼樣？

Answer 1

您的意思是？

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

範圍..，返回由那些計數的值的列表中，從左邊的值成正確的值。

有關如何使用範圍的詳細信息，請參閱： Perldoc range operator和this link

Answer 2

printf的是像這樣的問題產生。使用它可以幫助你更快地得到你想要的答案。

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

的%是「開始的格式序列」 的0是「前導零」 的3是「三位數字的最小」 的d是「治療參數作爲數字（整數）」