perl MIME::Lite::TT::Japanese Text::ASCIITable
Text::ASCIITableでテーブルを作成してM::T::T::Japanseへこんな感じでわたしてやっていたら
結果のテーブルが変形する。
my $msg = MIME::Lite::TT::Japanese->new( From => 'hoge@hoge.com', To => 'hoge@hoge.com', Subject => 'Hello', Template => \$template, TmplParams => { hoge => $text_ascii_table->draw } )->send;
何でかなーと思って perldoc MIME::Lite::TT::Japanese したら
LineWidth => 72
こんなパラメータが orz
http://search.cpan.org/~horiuchi/MIME-Lite-TT-Japanese-0.08/lib/MIME/Lite/TT/Japanese.pm
http://search.cpan.org/~lunatic/Text-ASCIITable-0.18/lib/Text/ASCIITable.pm