---
name: "Text::SimpleTable"
section: "3pm"
platform: "linux"
package: "libtext-simpletable-perl"
version: "2.07-1"
release: "Debian 13 (Trixie)"
platforms: ["linux"]
url: "https://new.carta.tech/Text::SimpleTable"
---

# Text::SimpleTable(3pm)

Simple Eyecandy ASCII Tables

## 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   |            |
    '-------+------------'
    print $t3->boxes->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');
```

### "boxes"

```
    $t = $t->boxes;
```

`"boxes"` switches the output generated by `"draw"` to use the unicode box drawing characters. The last  example above may not render nicely on some devices.

## AUTHOR

Sebastian Riedel, `"sri@cpan.org"`.

## MAINTAINER

Marcus Ramberg `"mramberg@cpan.org"`.

## CREDITS

In alphabetical order:

Brian Cassidy

## COPYRIGHT AND LICENSE

Copyright (C) 2005-2010, Sebastian Riedel.

This program is free software, you can redistribute it and/or modify it under the terms of the Artistic License version 2.0.