in reply to Drawing a table

I've found Text::Table to be exceptionally useful for these purposes...

In Section Seekers of Perl Wisdom