向各位请教

hwxo

1^# hwxo 发表于 2008-08-11 13:21

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

yingweixu

2^# yingweixu 发表于 2008-08-11 13:40

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

hwxo

3^# hwxo 发表于 2008-08-11 13:44

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

caining062

4^# caining062 发表于 2008-08-11 14:02

#!/usr/bin/perl
use strict;

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

hwxo

5^# hwxo 发表于 2008-08-11 14:05

多谢楼上的兄弟。

wellfroggy

6^# wellfroggy 发表于 2008-08-11 14:14

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

yingweixu

7^# yingweixu 发表于 2008-08-11 15:25

vi test.pl

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