Thread Text::Table::Tiny (18 answers)
Opened by geloescht at 2012-09-20 18:20

geloescht
 2012-09-20 23:44
#161971 #161971
User since
2012-06-19
141 Artikel
BenutzerIn
[default_avatar]
HI an alle

Ich habe encodig verwendet:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11

Bitte gesuchte Kundennummer eingeben :100100
 
+----------+----------+----------+---------------+--------------+-------+---------------+--------+-------------------+-----------+---------+--------------------+
| kdnummer | kddatum  | kdfirma  | kdstrasse     | kdhausnummer | kdplz | kdort         | kdland | kdansprechpartner | kdtelefon | kdfax   | kdemail            |
+----------+----------+----------+---------------+--------------+-------+---------------+--------+-------------------+-----------+---------+--------------------+
| 100100   | 20120917 | MaxTech  | Musterstrasse | 11           | 79576 | Weil am Rhein | D      | Herr Müller      | 123456    | 123456  | service@maxtech.de |
| 100100   | 20120917 | Testshop | Testweg       | 13           | 79618 | Rheinfelden   | D      | Frau Tester       | 123456    | 1234567 | test@tester.de     |
| 100100   | 20120917 | kjhkjh   | lkjlkj        | 45           | 78987 | ölkölk      | D      | Herr Lölle       | 321       | 654     | 654@mnbmn.de       |
+----------+----------+----------+---------------+--------------+-------+---------------+--------+-------------------+-----------+---------+--------------------+ 
 
Datensatzsuche beendet! [ENTER]


Jetzt stimmt die Tabelle, aber aus Müller wird "MÄ1/4ller".
Im Perl:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9

$rows=[];
push @$rows, [qw(kdnummer kddatum kdfirma kdstrasse kdhausnummer kdplz kdort kdland kdansprechpartner kdtelefon kdfax kdemail)];
while(@row = $sth->fetchrow_array){
                                  push @$rows, [@row];
                                  }

binmode STDOUT, ":encoding(utf-8)";
print Text::Table::Tiny::table(rows => $rows, header_row => 1);
print " \n";


Ich glaube das man das nicht perlseitig beheben kann, sondern dass das Modul fehlerhaft ist.
Das Modul müsste Umlaute automatisch richtig berücksichtigen. Ist das Text::Table besser? Ich habe auch schon was über Text::ASCII gelesen.

OK, Schluss für heute. Muss Morgen wieder früh raus.
Resümee für heute:
- Modul Text::Table::Tiny installiert...
- Eine halbwegs brauchbare Tabellenlösung für die Ausgabe...
- Ein Umlauteproblem entdeckt...

So what - Morgen ist auch noch ein Tag

Danke allerseits und gute Nacht

von HP-User
Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?

View full thread Text::Table::Tiny