Try Text::Table and family (see AoAoA to Text (or HTML table to text) for example).

update: Forget Text::Table, Text::ASCIITable is better

use strict; use warnings; use Text::ASCIITable; my $t = Text::ASCIITable::->new; $t->setCols('Nickname','Name'); $t->addRow('Lunatic-|','Håkon Nessjøen'); $t->addRow('tesepe','William Viker'); $t->addRow('espen','Espen Ursin-Holm'); $t->addRow('mamikk','Martin Mikkelsen'); $t->addRow('p33r','Espen A. Jütte'); $t->addRow(' ',' '); $t->addRow( wishlist => ' #overload to accept #push @$t, [ ( "poncho\nvilla" ) x 2 ]; # would be sweeet '); $t->addRow(' ',' '); my $p = Text::ASCIITable::->new; $p->setCols(split'','ponchovilla'); $p->addRow(split'',reverse 'ponchovilla'); $p->addRow(split'','ponchovilla'); $t->addRow( poncho => $p->draw() ); $p = Text::ASCIITable::->new; $p->setCols(qw'a b c'); $p->addRow(qw'you know me'); $t->addRow(' ',' '); $t->addRow( abc => "$p" ); print $t->draw(); __END__ .=----------+----------------------------------------------=. | Nickname | Name | |=----------+----------------------------------------------=| | Lunatic-| | Hskon Nessj°en | | tesepe | William Viker | | espen | Espen Ursin-Holm | | mamikk | Martin Mikkelsen | | p33r | Espen A. Jntte | | | | | wishlist | | | | #overload to accept | | | #push @$t, [ ( "poncho\nvilla" ) x 2 ]; | | | # would be sweeet | | | | | poncho | .=--+---+---+---+---+---+---+---+---+---+--=. | | | | p | o | n | c | h | o | v | i | l | l | a | | | | |=--+---+---+---+---+---+---+---+---+---+--=| | | | | a | l | l | i | v | o | h | c | n | o | p | | | | | p | o | n | c | h | o | v | i | l | l | a | | | | '=--+---+---+---+---+---+---+---+---+---+--=' | | | | | abc | .=----+------+---=. | | | | a | b | c | | | | |=----+------+---=| | | | | you | know | me | | | | '=----+------+---=' | '=----------+----------------------------------------------='

MJD says "you can't just make shit up and expect the computer to know what you mean, retardo!"
I run a Win32 PPM repository for perl 5.6.x and 5.8.x -- I take requests (README).
** The third rule of perl club is a statement of fact: pod is sexy.


In reply to Re: Visualisation of environment by PodMaster
in thread Visualisation of environment by AndreasL

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.