Datei einlesen und als Tabelle ausgeben (Perl/CGI)

[thread]13399[/thread]

Datei einlesen und als Tabelle ausgeben

Leser: 19

Articles: hide open all | hide show old branches

+8 replies
leo11

2009-04-18 13:06
User since
2008-08-14
250 Artikel
BenutzerIn
Hallo,

ich habe eine Datei die wie folgt aussieht:
=aaa=11111
=bbb=222
=ccc=77777

D.h. pro Zeile gibt es immer 2 = Zeichen. Nun möchte ich folgendes machen:
Bei Klick auf einen Button soll die Datei auf einer neuen Seite ausgegeben werden. Dabei soll der Inhalt als Tabelle mit 2 Spalten angezeigt werden. In der linken Spalte steht der String vom ersten bis zum zweiten = Zeichen, in der rechten der Inhalt rechts des 2ten = Zeichens. Die beiden Spalten füllen am besten die gesamte Bildschirmbreite zu je 50% aus.

Da ich auf diesem Gebiet neu bin bräuchte ich hier Starthilfe.
a.) Wie rufe ich das CGI in der HTML-Seite auf? So vielleicht?
Code: (dl )

1 2 3

<form action="cgi-bin/overview.cgi" method="get"> <input type="submit" value="OVERVIEW"> </form>
b.) Bräuchte ich mal ein Bsp. wie ich das mit einem perl-cgi am besten mache.
Last edited: 2009-04-18 13:07:47 +0200 (CEST)
- +6 replies
- GwenDragon
  
  2009-04-18 13:28
  User since
  2005-01-17
  14762 Artikel
  Admin1
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
  
  #!/usr/bin/perl $| = 1; use strict; use warnings; use CGI; my $cgi = new CGI; print $cgi->header; print $cgi->start_html; print $cgi->start_table; while (my $line = <DATA>) { chomp $line; my (undef, $col1, $col2) = split/=/,$line; print $cgi->Tr($cgi->td({-width=>"50%"},[$col1,$col2])); } print $cgi->end_table; print $cgi->end_html; 1; __DATA__ =aaa=11111 =bbb=222 =ccc=77777 __END__
  
  Und anstelle von DATA liest du das Dateihandle der Datei aus.
  Wie du eine Datei öffnest uns ausliest weißt du?
  Last edited: 2009-04-18 13:31:01 +0200 (CEST)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +5 replies
  - leo11
    
    2009-04-18 14:08
    
    User since
    2008-08-14
    250 Artikel
    BenutzerIn
    
    Ja, das weiß ich, danke. Ein Bsp. war genau dass was ich brauche. Dazu ein paar Fragen.
    
    1.) Was kann ich mit unter dem Output Autoflush vorstellen? Wenn ich die Zeile auskommentiere geht's genauso. In "Progr. mit Perl" steht dazu auf S. 246, das man damit den Ausgabepuffer eines Handles automatisch leert.?
    
    2.) Was hat es mit der 1; am Ende des Skripts auf sich? Hab das zwar irgendwann schonmal im Zusammenhang mit Modulen gelesen, aber.. .
    
    3.) Ist das Modul CGI auch das richtige, wenn ich nun jede Zelle editieren und abspeichern möchte?
    
    4.) Könnt ihr mir gute Lektüre im Zusammenhang mit CGI und Perl empfehlen.
    
    5.) Welche Module spielen im Zusammenhang mit CGI meist eine Rolle?
    - +4 replies
    - GwenDragon
      
      2009-04-18 14:23
      
      User since
      2005-01-17
      14762 Artikel
      Admin1
      
      Zu 1) ist bei mir automatisch drin. Damit das, was vom CGI ans STDOUT geschrieben wird, auch gleich ausgegeben wird. Sonst würde die Pufferung zuschlagen und dann würden teile der Ausgabe falsch oder zum falschen Zeitpunkt angezeigt.
      
      Zu 2) ist bei mir automatisch drin. Bedeutet einfach: eine 1 am Ende zurückgeben, bei Funktionen sinnvoll.
      
      Zu 3) Was willst du denn genau tun mit den Tabellenzellen?
      
      Zu 4) Siehe BuchEmpfehlungen
      Ich empfehle:
      * Einführung in Perl
      ** Programmieren mit Perl
      *** Perl Kochbuch
      
      In der Reihenfolge Schwierigkeitsgrade/Lernkurve
      
      Zu 5) Das kommt auf die Anwendung des CGI-Skriptes selbst an.
      Last edited: 2009-04-18 14:43:57 +0200 (CEST)
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - +2 replies
      - murphy
        
        2009-04-18 14:52
        
        User since
        2004-07-19
        1776 Artikel
        HausmeisterIn
        
        2009-04-18T12:23:00 GwenDragon
        Zu 1) ist bei mir automatisch drin. Damit das, was vom CGI ans STDOUT geschrieben wird, auch gleich ausgegeben wird. Sonst würde die Pufferung zuschlagen und dann würden teile der Ausgabe falsch oder zum falschen Zeitpunkt angezeigt.
        
        Also falsch sollte die Ausgabe nicht werden -- der Inhalt des Ausgabedatenstroms ist mit oder ohne Autoflush derselbe, es sei denn Perl ist intern kaputt ;-)
        
        Falsches Timing ist aber durchaus möglich. Gerade bei einem CGI ist es oft sinnvoll Autoflush anzuschalten, damit jede print-Ausgabe auch direkt an den Webserver weitergeleitet wird -- wenn Perl zunächst puffert und vielleicht erst am Ende des Skriptes die Ausgabe in einem Rutsch an den Webserver sendet, könnte dieser ungeduldig werden und das Skript vorher abschießen, in der irrigen Annahme dass es gar keine Ausgabe produziert und dafür zu lange braucht. Ferner puffert der Webserver unter Umständen die Ausgabe des CGIs bevor er sie an seinen Client weiterleitet und zweimal zu puffern bringt einfach keine Vorteile.
        
        Langer Rede kurzer Sinn: Autoflush anzuschalten schließt hier einfach einen Satz möglicher Fehlerquellen aus und schadet nicht.
        
        Quote
        Zu 2) ist bei mir automatisch drin. Bedeutet einfach: eine 1 am Ende zurückgeben, bei Funktionen sinnvoll.
        [...]
        
        Du meinst "bei Modulen", nicht "bei Funktionen", denke ich.
        When C++ is your hammer, every problem looks like your thumb.
        
        GwenDragon
        
        2009-04-18 15:27
        
        User since
        2005-01-17
        14762 Artikel
        Admin1
        
        2009-04-18T12:52:24 murphy
        Also falsch sollte die Ausgabe nicht werden
        Nein, ich habe es merkwürdig ausgedrückt. Nicht falsch, sondern unerwartet.
        
        2009-04-18T12:52:24 murphy
        Quote
        Zu 2) ist bei mir automatisch drin. Bedeutet einfach: eine 1 am Ende zurückgeben, bei Funktionen sinnvoll.
        [...]
        
        Du meinst "bei Modulen", nicht "bei Funktionen", denke ich.
        Na ja, das Skript ist schließlich (ich weiß: C-Denke!) auch eine Funktion, nämlich das Hauptprogramm main() ;)
        Sicher muss es nicht dastehen, aber meine Editor-Templates machen es eben so:
        
        Code (perl): (dl )
        
        1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
        
        #!/usr/bin/perl $| = 1; use strict; use warnings; sub main { } main(); 1; package MyModule; @ISA = (); @EXPORTER = (); use strict; use warnings; 1; __DATA__ __END__
        
        Hätte ich auch weglassen können.
        
        die Drachin Gwen
        
        Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
      - leo11
        
        2009-04-18 15:14
        
        User since
        2008-08-14
        250 Artikel
        BenutzerIn
        
        2009-04-18T12:23:00 GwenDragon
        Zu 3) Was willst du denn genau tun mit den Tabellenzellen?
        
        Ich möchte lernen wie man bspw. den Inhalt einer Zelle ändern kann. Zeigt mir der Browser in einer Zelle abc an, möchte ich hineinklicken, editieren und das Ergebnis am Ende per Speichern-Button zurückschreiben.
        Dasselbe möchte ich auch über ein Dropdown umsetzen können. D.h. bei Auswahl einer Zelle kommt ein DropDown, aus dem ich den neuen Inhalt auswählen kann.
        
        2009-04-18T12:23:00 GwenDragon
        Zu 4) Siehe BuchEmpfehlungen
        Ich empfehle:
        * Einführung in Perl
        ** Programmieren mit Perl
        *** Perl Kochbuch
        
        Die letzten beiden geschätzten Bücher habe ich bereits, ersteres mal geliehen.. . Im Kochbuch gibt's auch ein CGI-Kapitel, das mir allerdings zu kurz ist. Daher meine Frage: Was könnt ihr mir sonst noch empfehlen? Programming Web Services with Perl könnte was sein. Sonst wird im Wiki aber nix speziell für CGI aufgeführt. Kochbücher helfen mir immer sehr. Bin aber auch für anderes offen.
- GwenDragon
  
  2009-04-18 14:49
  User since
  2005-01-17
  14762 Artikel
  Admin1
  2009-04-18T11:06:14 leo11
  a.) Wie rufe ich das CGI in der HTML-Seite auf?
  
  Einfach ein Link.
  
  Code: (dl )
  
  <a href="cgi-bin/overview.cgi">OVERVIEW</a>
  
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2009-04-18 13:06.