Datensatzzeile / Tabelle / Horizontal (gelöst) (Allgemeines zu Perl) - Perl-Community.de

Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl

2024-11-22 11:35:55
Europe/Berlin
Einloggen (Registrieren)
- Einstellungen
- Statistics
Jemand zu Hause?
0 Benutzer online
6 Gäste

[thread]17765[/thread]

submit to reddit

Datensatzzeile / Tabelle / Horizontal [gelöst]

[gelöst]

Tags: perl5 Ähnliche Threads

Leser: 24

Articles: hide open all | hide show old branches

Teilbaum:
System-Update (4 Artikel) 2012-09-22 13:32

+29 replies
geloescht

2012-09-18 21:40
User since
2012-06-19
141 Artikel
BenutzerIn
Abend Leute,

Ich hab mal wieder ein "Spezial"-Problem. Ein Datensatz soll über das Terminal ausgegeben werden. Ich kann diesen als Hash oder als Array ausgeben. Das ist kein Problem. Die Schwierigkeit liegt darin,für Übersichtsausgaben eine horizontale Liste auszugeben, die einen Spaltencharakter aufweist. Hier die Terminalausgabe die nicht fluchtet, da Werte unterschiedlich lang:
Code: (dl )

1 2 3 4 5 6 7 8 9 10 11 12 13

+-----------------------------------------------------+ | E********** / Daten-Verwaltungs-Programm (EZ-DVP) | +-----------------------------------------------------+ >> Kunden suchen nach KD-Nummer << Bitte gesuchte Kundennummer eingeben :100100 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]
Der Perl-Passus:
Code (perl): (dl )

1 2 3

while(my @row = $sth->fetchrow_array){ print join("|", @row)."\n"; }
Ich hab auch schon das probiert:
Code (perl): (dl )

print join("\t", @row)."\n";
Aber auch die Tabs schaffen es nicht, die "|"-Striche vertikal auszurichten. Eine Idee, wie man das schön untereinander bekommt, so dass alle Spaltenköpfe schön fluchten?

Gruss HP-User

PS: Klar, ist jetzt ein blödes Beispiel, da in der Praxis eine Kundennummer immer nur einmal vergeben wird. Aber es gibt andere Stellen im Programm, da kann es durchaus sein, dass ich mehrere Treffer in der Datenbank habe, die ich auch ausgeben möchte.
Last edited: 2012-10-05 14:45:05 +0200 (CEST)
Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
- +28 replies
- pq
  
  2012-09-18 21:47
  
  User since
  2003-08-04
  12208 Artikel
  Admin1
  
  versuchs mal mit Text::Table, das nimmt dir das alles ab.
  Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
  lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
  - +27 replies
  - geloescht
    
    2012-09-18 22:20
    
    User since
    2012-06-19
    141 Artikel
    BenutzerIn
    
    Hallo nochmal,
    
    Hab mir von CPAN was runtergeladen (Text::Table) und entpakt. Wie bekomme ich das jetzt zum Laufen das ich mit apt-ret dieses Paket nutzen kann?
    
    Hab Linux Ubuntu drauf.
    
    Gruss HP-User
    Last edited: 2012-09-18 22:22:36 +0200 (CEST)
    Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
    - +22 replies
    - topeg
      
      2012-09-18 22:36
      
      User since
      2006-07-10
      2611 Artikel
      BenutzerIn
      
      Starte "Synaptic" und suche nach "text table -perl" Alle perlpakete haben folgende konventionen:
      lib<NAME>-perl wobei NAME der klein geschriebene Paketname ist, bei dem die "::" durch "-" ersetzt werden.
      Aus "Text::Table" wird also "libtext-table-perl"
      Das funktioniert in den meisten Fällen. Aus historischen Gründen, oder weil es Kollisionen mit den Namen gibt kann das abweichen.
      Auf der Konsole kannst du das eingeben: sudo apt-get install libtext-table-perl
      
      Wenn du Module hast die bei apt nicht dabei sind kannst du dhmake-perl benutzen um aus Cpan-Paketen, apt-Pakete zu machen. Wenn du es genau wissen willst dann such im Internet oder frage hier noch mal nach.
      - +21 replies
      - geloescht
        
        2012-09-18 22:55
        
        User since
        2012-06-19
        141 Artikel
        BenutzerIn
        
        Hallo topeg :-)
        
        sudobefehl gibt diese Fehlermeldung:
        
        Quote
        Konnte Paket libtext-table-perl nicht finden
        
        *grummel*
        
        Ich probiers weiter. Irgendwie muss das gehen...
        
        Gruss HP-User
        
        PS.:Synaptic geht nicht. Mein OS ist zu alt, alle Pfade für nachladen von Paketen sind nicht mehr erreichbar.
        Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
        
        topeg
        
        2012-09-18 23:11
        
        User since
        2006-07-10
        2611 Artikel
        BenutzerIn
        
        Deine Aussage suggeriert, dass du noch nie ein Paketupdate gemacht hast. Das ist sehr gefährlich. Nicht nur das damit Fehler behoben werden. Alte Programmversionen gefährden die Sicherheit des Systems. Welche Ubuntu Version hast du?
        
        Um die Pakete zu aktualisieren
        Mit Synaptic:
        "Bearbeiten" -> "Paketinformationen neu laden"
        Wenn das durchgelaufen ist:
        "Bearbeiten" -> "Alle Aktualisierungen vormerken"
        Dann
        "Bearbeiten" -> "Vorgemerkte Änderungen anwenden"
        
        Auf der Konsole:
        sudo apt-get update um die Paketquellen zu aktualisieren
        sudo apt-get upgrade um die neuesten Paket Versionen zu installieren
        
        Das funktioniert nur wenn du mit dem Internet verbunden bist und kann lange dauern bis das alles durchgelaufen ist, wenn du das nicht regelmäßig machst. Normalerweise läuft bei Ubuntu eine Programm im Hintergrund das dich informiert wenn es neue Pakete gibt.
        
        Wenn es Fehlermeldungen gibt liegt es wahrscheinlich daran das deine UbuntuVersion nicht mehr gepflegt wird. Was dann zu tun ist erkläre ich wenn es soweit ist.
        
        Ich habe selbst kein Ubuntu am laufen, sondern Debian auf dem Ubuntu basiert. Darum können manche Aussagen ungenau sein.
        
        +19 replies
        
        Raubtier
        
        2012-09-19 00:24
        
        User since
        2012-05-04
        1075 Artikel
        BenutzerIn
        
        Mit aktuellem Ubuntu:
        
        Quote
        $ apt-cache search libtext-table-perl
        libtext-table-perl - Create tables that adapt to alignment requirements
        
        Ist also dabei - du solltest wirklich updaten.
        
        Vielleicht hilft dir ansonsten auch perldoc perlform.
        
        +18 replies
        
        geloescht
        
        2012-09-19 15:05
        
        User since
        2012-06-19
        141 Artikel
        BenutzerIn
        
        Hallo zusammen,
        
        Ich kann nicht updaten - zu altes Ubuntu.
        Ich will auch nicht updaten, da ich keine Neuinstallation des Rechners machen möchte. Das OS bleibt wie es ist. Ich hab da alles gesperrt und Update geblockt. Wir sind doch nicht bei Windows, wo alle 5 Sekunden irgend ein nerviges Fenster nervt!
        
        Meine Version Ubuntu 9.04 Jounty Jackalope ...
        
        Das Modul muss auch so nachladbar sein.
        
        Trotzdem Gruss und Dank an alle
        
        HP-User
        Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
        
        +6 replies
        
        Gast wer
        
        2012-09-19 15:56
        
        Wie kommst du darauf dass du für ein Update das System neu Installieren musst? Das ist kein Windows.
        In den "/etc/apt/sources.list" oder in Synaptic die neuen Bezugsquellen für die Pakete eintragen und die Pakete aktualisieren.
        Last edited: 2012-09-19 16:24:00 +0200 (CEST)
        
        geloescht
        
        2012-09-19 20:02
        
        Subtree with 5 replies: System-Update
        
        User since
        2012-06-19
        141 Artikel
        BenutzerIn
        
        Hallo Gast,
        
        Weil auf den Webseiten von Ubuntuusers.de ganz klar gesagt wird, dass 9.04 nicht mehr updatebar ist. Die neue LTS (Long Term Version ) ist 12.04 .
        
        Gruss HP-User
        
        modedit Editiert von pq: teilbaum
        Last edited: 2012-09-22 13:27:51 +0200 (CEST)
        Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
        
        +11 replies
        
        GwenDragon
        
        2012-09-19 18:41
        
        User since
        2005-01-17
        14748 Artikel
        Admin1
        
        Das Update auf die aktuelle Ubuntu-Version ohne jeweils die dazwischen liegenden durchzuführen kann Ärger machen und manches nicht korrekt installieren. Meine langjährige leider ungute Ubuntu-Erfahrung.
        
        Wenn du dich nicht genau mit der Paketverwaltung auskennst, wenn da was bei apt und dpkg spinnt, solltest du jemand ein Update machen lassen.
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        +10 replies
        
        geloescht
        
        2012-09-19 20:24
        
        User since
        2012-06-19
        141 Artikel
        BenutzerIn
        
        Abend Gwen
        
        Wenn ich darf, würde ich gerne auf deine langjahrige Ubuntuerfahrung zugreifen :-)
        
        Wie seh ich den im Terminal nach, welche Perl Version installiert ist?
        
        Gruss HP-User
        Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
        
        +9 replies
        
        GwenDragon
        
        2012-09-19 20:43
        
        User since
        2005-01-17
        14748 Artikel
        Admin1
        
        Einfach:
        `which perl` -v
        um zu sehen was alles an Perl installiert ist:
        dpkg-query -l "*perl*" | grep ii
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        +8 replies
        
        geloescht
        
        2012-09-19 20:56
        
        User since
        2012-06-19
        141 Artikel
        BenutzerIn
        
        Hi Gwen,
        
        1. Befehl ergab:
        
        Code: (dl )
        
        1 2 3
        
        This is perl, v5.10.0 built for x86_64-linux-gnu-thread-multi Copyright 1987-2007, Larry Wall
        
        2. Befehl:
        
        Hat auch geklappt und eine Liste erzeugt.
        
        Der PC hat bei dem Befehl:
        
        Code: (dl )
        
        perl Makefile.PL
        
        Folgendes ausgespuckt:
        
        Quote
        Checking if your kit is complete...
        Looks good
        Warning: prerequisite Text::Aligner 0.05 not found.
        Writing Makefile for Text::Table
        Writing MYMETA.yml and MYMETA.json
        
        Das heisst es fehlt noch die "Text::Aligner"-Geschichte. Muss mal schauen, ob ich die woher bekomme...
        
        Gruss HP-User
        Last edited: 2012-09-19 21:16:58 +0200 (CEST)
        Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
        
        +5 replies
        
        pq
        
        2012-09-19 21:31
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        warum benutzt du denn nicht cpan?
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        +4 replies
        
        geloescht
        
        2012-09-19 21:49
        
        User since
        2012-06-19
        141 Artikel
        BenutzerIn
        
        Hallo pq :-)
        
        Ähm... weil ich nicht weis wie das geht?
        Ich finde viele dieser Module auf deren Seiten. Da kann man dann rechts anklicken und erhält so ein tar-gz-Dingens. Das entpake ich und kämpfe mit der Kon_sole_ - O _sole_ mio...
        
        Ist das Cpan, oder meinst du etwas anderes?
        
        Ich hab jetzt schon probiert folgendes nachzuinstallieren:
        
        Text::Table
        Text::Aligner
        Term::ANSIColor
        
        Es geht einfach nicht. Mein Perlprogramm läuft nur ohne "use Text::Table". Sobald das im Kopf steht, Fehlermeldung:
        
        Quote
        Can't locate Text/Table.pm in @INC (@INC contains: /etc/perl /usr/local/lib/perl/5.10.0 /usr/local/share/perl/5.10.0 /usr/lib/perl5 /usr/share/perl5 /usr/lib/perl/5.10 /usr/share/perl/5.10 /usr/local/lib/site_perl .) at ./EZ-DVP.pl line 8.
        BEGIN failed--compilation aborted at ./EZ-DVP.pl line 8.
        
        Ich kenn mich halt einfach zu wenig mit der Konsole aus...
        
        Gruss HP-User
        Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
        
        geloescht
        
        2012-09-19 22:57
        
        User since
        2012-06-19
        141 Artikel
        BenutzerIn
        
        Hallo nochmal ;-)
        
        Hat endlich geklappt. Ich hab die kleinere Version von "Text::Table" genommen.
        Die heisst treffenderweise "Text::Table::Tiny"...
        
        Gruss HP-User
        Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
        
        pq
        
        2012-09-19 23:42
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        einfach nur das tool cpan benutzen.
        wurde doch schon gesagt: msg #161936
        weiterhin gibt es die seite
        ModuleWieInstalliereIchEinModul
        (die wurde aber im thread glaube ich noch gar nicht genannt, weil es unter debian oder ubuntu normalerweise tatsächlich einfacher ist, apt zu benutzen)
        
        einfach
        cpan Text::Table eingeben und das macht den download für dich, packt das tarfile aus, macht perl Makefile.PL und den ganzen rest und löst auch noch automatisch die abhängigkeiten von anderen modulen auf.
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        pq
        
        2012-09-20 10:03
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        und was ich nicht verstehe - du hast cpan sogar schon benutzt. nämlich hier:
        Unterschied DBD::CSV / DBI::CSV
        Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
        lesen: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        +2 replies
        
        GwenDragon
        
        2012-09-20 09:30
        
        User since
        2005-01-17
        14748 Artikel
        Admin1
        
        Wie ich schon früher schrieb:
        
        2012-09-19T13:46:03 GwenDragon
        Da du dein Ubuntu nicht mit apt oder aptitude updaten willst, installierst du dir eben das Modul mit cpan in der Shell:
        
        ~ cpan Text::Table
        
        Warum verwendest du nicht cpan? Welchen Grund hat das? Du erschwerst dir nur den Umgang mit Perl, wenn du was lokal runter lädst, entpackst, dort mit Perl Makefile ... erstellst und dann feststellst, dass was fehlst und wieder runter lädst.
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        geloescht
        
        2012-09-20 18:04
        
        User since
        2012-06-19
        141 Artikel
        BenutzerIn
        
        Hallo zusammen
        
        Da hat es eben geklappt. Bei Text::Table ging das nicht. Da schrieb die Kommandozeile:
        
        Quote
        Transfer truncated: only out of 198462 bytes received
        
        Das kleinere Modul Text::Table::Tiny ist installiert und kann fehlerfrei eingebunden werden. Nur mit der Benutzung hapert es. Aber dazu gleich ein neuer Thread.
        
        Ganz wichtig:
        Hier möchte ich mir die Zeit nehmen, und wirklich allen Danken, die auf meine Fragen geantwortet haben. Vielen, vielen Dank an alle!
        
        Gruss HP-User
        Past brought us "SYS 64738". Present brought us "ctrl+alt+del". But what will future bring?
    - +4 replies
    - GwenDragon
      
      2012-09-19 15:46
      
      User since
      2005-01-17
      14748 Artikel
      Admin1
      
      2012-09-18T20:20:59 ?
      Hab mir von CPAN was runtergeladen (Text::Table) und entpakt. Wie bekomme ich das jetzt zum Laufen das ich mit apt-ret dieses Paket nutzen kann?
      
      Da du dein Ubuntu nicht mit apt oder aptitude updaten willst, installierst du dir eben das Modul mit cpan in der Shell:
      
      ~ cpan Text::Table
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - +3 replies
      - hlubenow
        
        2012-09-19 18:35
        
        User since
        2009-02-22
        875 Artikel
        BenutzerIn
        
        Ich mach' das sogar immer von Hand:
        
        Code: (dl )
        
        1 2 3 4 5 6
        
        tar -xzvf modul.tar.gz cd modulverzeichnis perl Makefile.pl make su make install
        
        Manchmal noch "make test" zwischen "make" und "su".
        Weitere Abhängigkeiten löse ich dann allerdings auch von Hand auf. Das heißt, oft muß man erst noch weitere CPAN-Module auf diese Weise dazuinstallieren.
        Wenn die Perl-5-Version allzu alt ist, kann es auch vorkommen, daß man's nicht mehr hinkriegt, weil die Module im Verhältnis zu neu sind, bzw. ein zu neues Perl erwarten.
        
        +2 replies
        
        GwenDragon
        
        2012-09-19 18:43
        
        User since
        2005-01-17
        14748 Artikel
        Admin1
        
        2012-09-19T16:35:50 hlubenow
        weil die Module im Verhältnis zu neu sind, bzw. ein zu neues Perl erwarten.
        
        Dann suchst du in CPAN Testers diejenigen, die für die Version ein PASS haben und daher für deine Perl-Version passen sollten.
        Last edited: 2012-09-19 18:45:55 +0200 (CEST)
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
        
        hlubenow
        
        2012-09-19 23:32
        
        User since
        2009-02-22
        875 Artikel
        BenutzerIn
        
        Cool, danke!

View all threads created 2012-09-18 21:40.