perl 定长切分大字符串

概述无聊的时候想看小说，但是现在的小说排版很不好，就想“定长切分大字符串”重新排版一下，   找了一下资料，有两个好方法   用unpack已经可以了，具体的做法 @a = unpack("a25"X1000,$str); 上面的就是把$str分成1000个有25字符的字符串   正则表达式   @a = $str =~ /(.{25})/g;

无聊的时候想看小说，但是现在的小说排版很不好，就想“定长切分大字符串”重新排版一下，@H_403_7@

 @H_403_7@

找了一下资料，有两个好方法@H_403_7@

 @H_403_7@

用unpack已经可以了，具体的做法 @a = unpack("a25"X1000,$str);
上面的就是把$str分成1000个有25字符的字符串@H_403_7@

 @H_403_7@

正则表达式@H_403_7@

 @H_403_7@

@a = $str =~ /(.{25})/g;@H_403_7@ 总结

以上是内存溢出为你收集整理的perl 定长切分大字符串全部内容，希望文章能够帮你解决perl 定长切分大字符串所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。