CPAN Module How To - Text::SimpleTable
シリーズ化できるか分かりませんが、Google で検索しても、あまり情報が無かった CPAN モジュールの使い方を紹介していきたいと思います。
先ほど、アップデートされていた Text::SimpleTable を紹介したいと思います。
0.05 から 1.0 になって SEE ALSO Catalyst が消えましたね。
このモジュールは下記のようなアスキーの表を簡単に出力できます。
.-------+------------. | Foo | Bar | +-------+------------+ | foob- | yadayaday- | | arbaz | ada | +-------+------------+ | barb- | yada | | arba- | | | rbar- | | | bar | | '-------+------------'
使い方は、
my $t = Text::SimpleTable->new([5, 'Col1', 10, 'Col2']);
で、テーブルのヘッダに表示するタイトルと、文字幅を指定して new します。
あとは、行ごとに
$t = $t->row('col1 data', 'col2 data');
リストでデータを row() に渡し、
データを全て渡し終わったら
my $ascii = $t->draw;
で最初の例のような、レンダリングした結果を取得できます。
Ver. 1.1 から、途中で罫線も挿入できるようになりました。
$t = $t->hr;
デバッグログ出力用にとても便利です。
