作者adu (^_^)
看板Perl
标题[问题] print时依字元长度自动换行？
时间Sun May 9 01:32:03 2010
原始资料以hash的方式储存，每个key是name，value是内容
ex:
name1 aaaaaaaaabbbcddddd........zzzz
name2 dddddddddddddweeeeeeeeeeeeeeeeennn....ssss
...
现在想把这些print出来，当长度大於10就自动增加"\n"
>name1
aaaaaaaaab
bbcddddd..
......zzzz
>name2
dddddddddd
dddweeeeee
eeeeeeeeee
ennn....ss
ss
很阳春的想法是先把第一次print的资料">Output1"
然後再open Output1,
再用
while(<>){
chomp;
if(length($_)>10){
print "\n";
}
}这样的方式:p
请教板大们有没有更好的方法呢？
谢谢回应！
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.113.195.136