NAME¶

Text::SimpleTable - Simple Eyecandy ASCII Tables

SYNOPSIS¶

    use Text::SimpleTable;
    my $t1 = Text::SimpleTable->new(5, 10);
    $t1->row('foobarbaz', 'yadayadayada');
    print $t1->draw;
    .-------+------------.
    | foob- | yadayaday- |
    | arbaz | ada        |
    '-------+------------'
    my $t2 = Text::SimpleTable->new([5, 'Foo'], [10, 'Bar']);
    $t2->row('foobarbaz', 'yadayadayada');
    $t2->row('barbarbarbarbar', 'yada');
    print $t2->draw;
    .-------+------------.
    | Foo   | Bar        |
    +-------+------------+
    | foob- | yadayaday- |
    | arbaz | ada        |
    | barb- | yada       |
    | arba- |            |
    | rbar- |            |
    | bar   |            |
    '-------+------------'
    my $t3 = Text::SimpleTable->new([5, 'Foo'], [10, 'Bar']);
    $t3->row('foobarbaz', 'yadayadayada');
    $t3->hr;
    $t3->row('barbarbarbarbar', 'yada');
    print $t3->draw;
    .-------+------------.
    | Foo   | Bar        |
    +-------+------------+
    | foob- | yadayaday- |
    | arbaz | ada        |
    +-------+------------+
    | barb- | yada       |
    | arba- |            |
    | rbar- |            |
    | bar   |            |
    '-------+------------'

DESCRIPTION¶

Simple eyecandy ASCII tables.

METHODS¶

Text::SimpleTable implements the following methods.

"new"¶

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

"draw"¶

    my $ascii = $t->draw;

"hr"¶

    $t = $t->hr;

"row"¶

    $t = $t->row('col1 data', 'col2 data');

AUTHOR¶

Sebastian Riedel, "sri@cpan.org".

CREDITS¶

In alphabetical order: Brian Cassidy

COPYRIGHT¶

Copyright (C) 2005-2009, Sebastian Riedel. This program is free software, you can redistribute it and/or modify it under the same terms as Perl 5.10.