好像也可以用 format 实现。
__END__
{
$name = '林兴陆(@小林)';
$qq = 28888888;
$mail = '[email protected]';
@tel = (18601350410, 13501281365);
%url = (
'website' => "http://www.yes123.com";,
'homepage' => "http://linxinglu.com";
);
# 信恩科技: 移动学习 寓教于乐
}
在 2013-5-15，19:09，"夏凯" <[email protected]> 写道：
> On 2013年05月15日 17:39, Li Xiangchen wrote:
>> 这样的每20行数据为一列，中间以制表符隔开的形式，但苦于刚学Perl不太会写 程序操作，还请朋友帮忙，谢谢！
> 一个hash，然后每次写入a[i" "j]，i是行数-1除以20的余数，j是行数-1除以20的 结果，然后最后只要两个for循环把这个散列打印出来就行了。
> 比如数据是1-6，然后变成三行
> a[0" "0]=1
> a[1" "0]=2
> a[2" "0]=3
> a[0" "1]=4
> a[1" "1]=5
> a[2" "1]=6
> for(i=0;i<2;i++)for(j=0;j<=col;j++)，这样打印出来就是
> 1 4
> 2 5
> 3 6
>
> --
> 您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
> 要退订此论坛并停止接收此论坛的电子邮件，请发送电子邮件到 [email protected]。
> 要向此网上论坛发帖，请发送电子邮件至 [email protected]。
> 通过以下网址访问此论坛：http://groups.google.com/group/perlchina?hl=zh-CN。
> 要查看更多选项，请访问 https://groups.google.com/groups/opt_out。
>
>
--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要退订此论坛并停止接收此论坛的电子邮件，请发送电子邮件到 [email protected]。
要向此网上论坛发帖，请发送电子邮件至 [email protected]。
通过以下网址访问此论坛：http://groups.google.com/group/perlchina?hl=zh-CN。
要查看更多选项，请访问 https://groups.google.com/groups/opt_out。
