向各位请教

hwxo

怎么打印test00001,test00002..test12345?
多谢各位指教。

yingweixu

问题问得比较含糊！你指的是print 还是调用连接的打印机来打印文件？

hwxo

说得是太含糊了。
我就想生成这12345个字符串。不知道怎么做。

caining062

#!/usr/bin/perl
use strict;

printf "test"."%05d\n",$_ for(1 .. 12345);

hwxo

多谢楼上的兄弟。

wellfroggy

#!/usr/bin/perl
@_=(1 .. 12345);
print "@_";
以空格相隔

yingweixu

vi test.pl

#!/usr/bin/perl -w
my @str=(1..12345);
foreach (@str){
printf "test.%05d\n",$_;
}