Listen in Tabellenform darstellen

[Jörk Behrends]

Hallo,

kennt jemand eine Möglichkeit in Perl eine Liste @list (Name, Adresse, Telefon) möglichst einfach in einer Tabelle auszugeben, die eine feste Breite hat z.B. DinA4 und wenn der Name/ die Strasse zu lang für die Zeile ist, daß automatisch eine neue Zeile geschrieben wird mit dem Rest des Namens / der Strasse.

Das ganze geht mit Formaten (siehe 'perldoc perlform'):

format STDOUT =
^<<<<<<<<<<<<< ^<<<<<<<<<<<<< ^<<<<<<<<<<<<<
$name,         $strasse,      $telefon
.

Die Header ausgeben

($name, $strasse, $telefon) = qw(Name Strasse Telefon);
write;

Und nun in einer Schleife die drei Variablen befüllen, und mit write ausgeben lassen.

Gruß,
   Jörk