固定幅で折り返す

---

　Jcodeモジュールのjfoldを使うのが簡単です。

use strict;
use warnings;
use Jcode;

while (my $line = <>) {
    print Jcode->new($line)->jfold(40)->sjis;
}

---

関連項目

・固定幅で折り返す2
・テキストで表を作成する