Umbau eines Skript mit der CGI-Bibliothek (Perl/CGI)

[thread]19963[/thread]

Umbau eines Skript mit der CGI-Bibliothek

Tags: perl5 CGI Ähnliche Threads

Leser: 14

Articles: hide open all | hide show old branches

+14 replies
Michael47

2016-01-24 13:44
User since
2016-01-22
53 Artikel
BenutzerIn
Hallo Leute. Ich bin schon wieder da. Ich soll ein Taschenrechner-Skript mit einer CGI-Bibliothek umbauen. Das Skript vom TR ist ja schon vorhanden. Ich steh total am Schlauch wie ich anfangen soll. Ich bin ja noch Anfänger und natürlich nicht so viel Ahnung. Vielleicht kann mir wer helfen.
Hier mal der Code:
Code: (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 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51

#!C:\Perl64\bin\perl.exe -w use strict; use warnings; use CGI (); my $cgi = CGI::new; my $zahl1 = $cgi->param('Zahl1'); my $zahl2 = $cgi->param('Zahl2'); my $operator = $cgi->param('Rechenart'); my $ergebnis; print $cgi->header(); print <<HTML; <html> <body> HTML if (length($zahl1) and length($zahl2) and length($operator)) { $ergebnis = 'NaN'; # berechne je nach Operator $ergebnis = $zahl1 + $zahl2 if $operator eq '+'; $ergebnis = $zahl1 - $zahl2 if $operator eq '-'; $ergebnis = $zahl1 * $zahl2 if $operator eq '*'; $ergebnis = $zahl1 / $zahl2 if $operator eq '/'; $ergebnis = $zahl1 % $zahl2 if $operator eq '%'; $ergebnis = $zahl1 ** $zahl2 if $operator eq '**'; print "<p>Das Ergebnis von $zahl1 $operator $zahl2 ist $ergebnis</p>"; } else { print <<HTML; <form action="#" method="post"> <p>Zahl 1: <input size="4" maxlength="3" name="Zahl1"> <br> Zahl 2: <input size="4" maxlength="3" name="Zahl2"> <br> Rechenart: <input size="2" maxlength="3" name="Rechenart"> <br> <input type="SUBMIT" value="Berechnen"> </p> </form> HTML } print <<HTML; </body> </html> HTML
Last edited: 2016-01-24 14:39:29 +0100 (CET)
- +5 replies
- jan
  
  2016-01-24 17:24
  
  User since
  2003-08-04
  2536 Artikel
  ModeratorIn
  
  Wenn dir jemand bei den Hausaufgaben helfen soll, wäre es sinnvoll, wenn Du die Hausaufgaben postest und nicht einfach nur ein bisschen Code. So weiß niemand, was das Ziel ist, außer, dass Du irgendwas "umbauen" sollst.
  - +4 replies
  - Michael47
    
    2016-01-24 17:54
    
    User since
    2016-01-22
    53 Artikel
    BenutzerIn
    
    2016-01-24T16:24:04 jan
    Wenn dir jemand bei den Hausaufgaben helfen soll, wäre es sinnvoll, wenn Du die Hausaufgaben postest und nicht einfach nur ein bisschen Code. So weiß niemand, was das Ziel ist, außer, dass Du irgendwas "umbauen" sollst.
    
    Sorry das war nicht meine Absicht. Also hier nochmal die ganze Aufgabe: Nehmen Sie die Vorhergehende Lösung (Taschenrechner) und bauen Sie diese mit der CGI-Bibliothek um.
    - +3 replies
    - jan
      
      2016-01-24 23:14
      
      User since
      2003-08-04
      2536 Artikel
      ModeratorIn
      
      Und Du hast nun den o.g. Code. Was ist daran nicht ausreichend für deine Aufgabenstellung? Welche Ergebnisse erwartest Du?
      - +2 replies
      - Michael47
        
        2016-01-25 07:13
        
        User since
        2016-01-22
        53 Artikel
        BenutzerIn
        
        2016-01-24T22:14:23 jan
        Und Du hast nun den o.g. Code. Was ist daran nicht ausreichend für deine Aufgabenstellung? Welche Ergebnisse erwartest Du?
        
        Ich hab einfach keine Idee, wie ich anfangen soll.
        
        RalphFFM
        
        2016-01-25 07:45
        
        User since
        2006-11-16
        258 Artikel
        BenutzerIn
        
        Möglicherweise ist einfach nur beabsichtigt ein Umschreiben in die mehr objektorientierte Schreibweise? Also z.B. sowas wie
        
        Code: (dl )
        
        1 2 3
        
        print <<HTML; <form action="#" method="post"> ...
        
        ersetzen durch
        
        Code: (dl )
        
        1 2 3 4 5
        
        print $cgi->start_form( -method => 'POST', -action => '#' ... );
- Gast janus
  
  2016-01-25 08:43
  
  Mit CGI.pm kannst Du HTML erzeugen und Parameter erfassen. So guckst Du Deine bisherige Lösung an und ersetzt das was Du mit CGI.pm machen kannst eben durch die Funktionen, die CGI.pm dazu hat. Was an dieser einfachen Aufgabe hast Du nicht verstanden?
  Last edited: 2016-01-25 09:09:47 +0100 (CET)
- +3 replies
- GwenDragon
  
  2016-01-25 09:09
  
  User since
  2005-01-17
  14607 Artikel
  Admin1
  
  In Bezug auf
  2016-01-24T16:54:43 Michael47
  (...)
  Also hier nochmal die ganze Aufgabe: Nehmen Sie die Vorhergehende Lösung (Taschenrechner) und bauen Sie diese mit der CGI-Bibliothek um.
  Du benutzt ja schon die Bibliothek CGI.
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +2 replies
  - Michael47
    
    2016-01-25 09:14
    
    User since
    2016-01-22
    53 Artikel
    BenutzerIn
    
    Hallo GwenDragon.
    
    Dann versteh ich die Aufgabe der Hausübung nicht. Ich bin wahrscheinlich zu blöd oder ich denk nur total verdreht.
    - Linuxer
      
      2016-01-25 13:13
      
      User since
      2006-01-27
      3881 Artikel
      HausmeisterIn
      
      Ich kann mir hier vorstellen, dass die Aufgaben aufeinander aufbauen. Es sollen wohl die Grundlagen für CGI (Common Gateway Interface) vermittelt werden.
      
      Das Auslesen der Parameter kann man gemäß CGI-Spezifikation "händisch" machen oder man benutzt direkt eine Bibliothek (bzw. Modul), die diese Spezifikation bereits umsetzen kann. Bei Perl wäre das klassisch eben das Modul CGI.
      Der Vorteil liegt darin, dass dieses Modul einem Arbeit abnimmt und schon vielfältig getestet worden ist.
      
      Bevor ich also selber (fehlerträchtig) die Routinen zusammenschreibe, um die übermittelten Daten auszulesen, nutze ich die Mechanismen des CGI-Modul.
      
      Möglicherweise sollte die erste Aufgabe mit selbst geschriebener Verarbeitung der Parameter gelöst werden.
      Und die zweite Aufgabe erwartet dann eine Überarbeitung des Skriptes, damit es dann die Mechanismen von CGI benutzt.
      
      Diskussionen wie es ohne CGI-Modul machbar wäre, finden sich z.B. bei den Perl Monks:
      - http://www.perlmonks.org/?node_id=24065
      - http://www.perlmonks.org/?node_id=2244
      
      Darin finden sich auch Hinweise und Begründungen, das eben nicht so zu tun.
      
      Zum Lernen, wie die Parameter übertragen und ausgewertet werden können, kann so eine Übung nützlich sein. Produktiv solltest Du die Parameter aber nicht selber auslesen, sondern eben mit dem CGI-oder einem ähnlichen Modul arbeiten.
      
      Bei Unklarheiten zu den Aufgaben muss der Dozent herhalten und die Unklarheiten beseitigen (sprich Fragen beantworten).
      meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
      Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
- +4 replies
- GwenDragon
  
  2016-01-25 10:07
  User since
  2005-01-17
  14607 Artikel
  Admin1
  Du wirst dich ja schon mit HTML befasst haben im Rahmen deiner Ausbildung.
  
  HTML-Elemente können auch mittels der Bibliothek CGI erzeuget werden, siehe: CGI::HTML::Functions
  Bitte auch die Doku ansehen beim üben!
  
  Probieren wir es mal.
  Ein Hinweis wie das Modul CGI arbeitet.
  Start- und End-Elemente von HTML werden dargestellt durch start_ELEMENTNAME und end_ELEMENTNAME. Komplette HTML-Blöcke/Elemente ohne das start_ oder end_.
  
  Der Anfang des HTML-Gerüsts wird vereinfacht ohne das Modul oft so ausgegeben
  
  Code (perl): (dl )
  
  1 2 3 4
  
  print <<HTML; <html> <body> HTML
  
  Mit Modul lässt sich auch so bewerkstelligen
  
  Code (perl): (dl )
  
  print $cgi->start_html;
  
  Das Ende eines HTML-Blocks
  
  Code (perl): (dl )
  
  1 2 3 4
  
  print <<HTML; </body> </html> HTML
  
  kann ähnlich durch
  
  Code (perl): (dl )
  
  print $cgi->end_html;
  
  erstellt werden.
  
  Ein P-Element mit Text kann so erzeugt werden
  
  Code (perl): (dl )
  
  print $cgi->p("Das ist ein Text");
  
  wird zu
  
  Code: (dl )
  
  <p>Das ist ein Text</p>
  
  Das ist auch gleichbedeutend mit
  
  Code (perl): (dl )
  
  print $cgi->start_p,"Das ist ein Text", $cgi->end_p;
  
  Formatierungen innerhalb von HTML-Elementen wie I, B, EM etc. gehen auch.
  
  Code (perl): (dl )
  
  print "Das HTML-Element I ist ", $cgi->i("Kursiv"), " und B ist ", $cgi->b("Fett");
  
  Zur Erzeugung von verschachtelten HTML-Elementen lassen sich auch diese Funktionen so schachteln:
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  print $cgi->div( $cgi->p("Ein Absatz mit ",$cgi->i("kursivem"), " Text"), # Absatz 1 mit diversem Text $cgi->br(), # ein Zeilenumbruch $cgi->p("2. Absatz") # Absatz 2 mit diversem Text );
  
  erzeugt dann
  
  Code: (dl )
  
  <div><p>Ein Absatz mit <i>kursivem</i> Text</p> <br /> <p>2. Absatz</p></div>
  
  Wenn Elemente noch Attribute haben, müssen diese vor dem Element-Inhalt in geschweiften Klammern stehen, damit das Modul die einfügt. Attributnamen und Attributwerte werden zur besseren Erkennung der Zusammengehörigkeit mit => getrennt.
  Ein HTML-Element P mit einem Attribut ID mit dem Wert erstezeile kann also so werzeugt werden:
  
  Code (perl): (dl )
  
  $cgi->p({ id=>"erstezeile }, "Text Text");
  
  Mehrere Attribute wenden Liste durch Komma getrennt.
  
  Code (perl): (dl )
  
  $cgi->p({ id=>"erstezeile, name=>"ez", style=>"font-size:200%" }, "Text Text");
  
  ergibt dann:
  
  Code (perl): (dl )
  
  <p id="erstezeile" name="ez" style="font-size:200%">Text Text</p>
  
  Nun zu Formularen wie in https://metacpan.org/pod/distribution/CGI/lib/CGI/... gezeigt.
  Also fangen wir mal an (und schrieben es mehrzeilig zur besseren Kommentierung).
  Ein Formular beginnt also mit start_form, braucht aber noch ein paar Parameter um komplett zu sein.
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  print start_form( -method=>"POST", # Übersendung der Daten mit HTTP-Methode POST -action=>"#" # sendet an das gerade aufgerufene Perl-Programm selbst ); # dazwischen weitere Ausgaben
  
  und endet mit
  
  Code (perl): (dl )
  
  print end_form;
  
  Etwas unstrukturiert beschrieben, aber ich bin auch nicht deine Dozentin und kann nich so eben mal ein Perl-CGI-HTML-Lernskript aus dem Pullover schütteln. ;)
  Musst du bei Problemen hier weiter fragen.
  
  Dann probier mal. Viel Erfolg.
  Last edited: 2016-01-25 10:17:56 +0100 (CET)
  die Drachin Gwen
  
  Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
  - +3 replies
  - Michael47
    
    2016-01-25 10:24
    
    User since
    2016-01-22
    53 Artikel
    BenutzerIn
    
    Also wenn ich das richtig versteh ist das eh schon fertig. Wenn ich z.B. "localhost/Taschenrechner.html" aufrufe, dann wird´s mit so angezeigt, wie es soll?
    - GwenDragon
      
      2016-01-25 11:23
      
      User since
      2005-01-17
      14607 Artikel
      Admin1
      
      Wieso localhost/Taschenrechner.html? Das Skript kann nur als Taschenrechner.pl aufgerufen werden.
      
      Und was ist fertig? Das Programm arbeitet mit Bibliothek/Modul CGI. Wenn das die Aufgabe ist, ist es möglicherweise fertig.
      Aber so ganz versteh ich nicht die Aufgabenstellung. Ich nehme an, du sollst das Skript so umbauen, dass es komplett mit CGG-Modul arbeitet, also so wie ich sagte, dass HTML mit dem Modul CGI erzeigt wird. Das wird Pluspunkte geben.
      Frag doch bitte nochmals nach beim Aufgabensteller.
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten
    - GwenDragon
      
      2016-01-25 11:25
      
      User since
      2005-01-17
      14607 Artikel
      Admin1
      
      Splitted to Sortierprogramm das einen Dateinamen verlangt und lexiographisch sortiert
      
      Original message by 'Michael47':
      
      Quote
      Mal eine ganz andere Frage. Ich soll ein Sortierpr...
      
      die Drachin Gwen
      
      Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2016-01-24 13:44.