1Text::SimpleTable(3) User Contributed Perl Documentation Text::SimpleTable(3)
2
3
4
6 Text::SimpleTable - Simple Eyecandy ASCII Tables
7
9 use Text::SimpleTable;
10
11 my $t1 = Text::SimpleTable->new( 5, 10 );
12 $t1->row( 'foobarbaz', 'yadayadayada' );
13 print $t1->draw;
14
15 .-------+------------.
16 ⎪ foob- ⎪ yadayaday- ⎪
17 ⎪ arbaz ⎪ ada ⎪
18 '-------+------------'
19
20 my $t2 = Text::SimpleTable->new( [ 5, 'Foo' ], [ 10, 'Bar' ] );
21 $t2->row( 'foobarbaz', 'yadayadayada' );
22 $t2->row( 'barbarbarbarbar', 'yada' );
23 print $t2->draw;
24
25 .-------+------------.
26 ⎪ Foo ⎪ Bar ⎪
27 +-------+------------+
28 ⎪ foob- ⎪ yadayaday- ⎪
29 ⎪ arbaz ⎪ ada ⎪
30 ⎪ barb- ⎪ yada ⎪
31 ⎪ arba- ⎪ ⎪
32 ⎪ rbar- ⎪ ⎪
33 ⎪ bar ⎪ ⎪
34 '-------+------------'
35
37 Simple eyecandy ASCII tables, as seen in Catalyst.
38
40 $table->row( @texts )
41 $table->draw
42
44 Catalyst
45
47 Sebastian Riedel, "sri@oook.de"
48
50 This program is free software, you can redistribute it and/or modify it
51 under the same terms as Perl itself.
52
53
54
55perl v5.8.8 2007-05-04 Text::SimpleTable(3)