ASCII-Tabellen mit Text::ASCIITable

| | Kommentare (0)

Dank Text::ASCIITable von Håkon Nessjøen lassen sich schöne Tabellen im Textmodus im Handumdrehen erstellen.

 

Beispiel

#!/usr/bin/perl 
use strict;
use warnings;

use Text::ASCIITable;

my $table = Text::ASCIITable->new( { headingText => 'Sales per Year' } );

$table->setCols( 'Year', 'Sales' );

$table->alignCol( 'Year' => 'left', 'Sales' => 'right' );

$table->addRow( 2005, "3000.00" );
$table->addRow( 2006, "4000.00" );
$table->addRow( 2007, "3500.00" );
$table->addRow( 2008, "5800.00" );

$table->addRowLine;
$table->addRow( 'Average', "4075.00" );

print $table;

Das Programm erzeugt folgende Ausgabe:

.-------------------.
|   Sales per Year  |
+---------+---------+
| Year    | Sales   |
+---------+---------+
| 2005    | 3000.00 |
| 2006    | 4000.00 |
| 2007    | 3500.00 |
| 2008    | 5800.00 |
+---------+---------+
| Average | 4075.00 |
'---------+---------'

 

Siehe auch

Jetzt kommentieren

Über diese Seite

Diese Seite enthält einen einen einzelnen Eintrag von Thomas Fahle vom 21.09.09 19:30.

File::Which - portables (p)which ist der vorherige Eintrag in diesem Blog.

YAPC::EU::2009 videos - Larry Wall talking about Perl 6 ist der nächste Eintrag in diesem Blog.

Aktuelle Einträge finden Sie auf der Startseite, alle Einträge in den Archiven.

Fachzeitschriften

Blog Roll

Powered by

Powered by Movable Type 5.2.7

Creative Commons-Lizenz

Creative Commons License
Dieses Weblog steht unter einer Creative Commons-Lizenz.