Таблицы псевдографикой

Задача отправлять табличную информацию на почту.  И решение в общем то очевидное - использовать псевдографику(хотя возможно кого-то устроит html), либо просто выравнивать текст при помощи printf, но эффект уже не тот :).  Полчаса моего поиска в CPAN увенчались успехом и был найдет модуль Text::SimpleTable, который был предельно простым и полностью решал поставленную задачу. 

Пример:

use Text::SimpleTable;

my $t = Text::SimpleTable->new([5, 'Foo'], [10, 'Bar']);

$t->row('foobarbaz', 'yadayadayada');

$t->hr;

$t->row('barbarbarbarbar', 'yada');

print $t->draw;

.-------+------------.

| Foo   | Bar        |

+-------+------------+

| foob- | yadayaday- |

| arbaz | ada        |

+-------+------------+

| barb- | yada       |

| arba- |            |

| rbar- |            |

| bar   |            |

'-------+------------'