Text::ASCIITableがmulti-width charactersに対応していないようですよ!腕に覚えのあるPerl Mongerにおかれましてはパッチを書いてみてはいかがでしょうか!! 2011-06-11 18:46:31 via Tween このようにText::ASCIITableはデフォルトでは半角文字だけで日本語等の 全角幅の文字を含めるとテーブルにずれが生じてしまいます。 #!perl use strict; use warnings; use utf8; use Text::ASCIITable; binmode STDOUT, ":utf8"; my $japanese_table = Text::ASCIITable->new({headingText => '価格表',}); $japanese_table->setCols('名前', '値段', '在庫