Perl und CGI Einführung

{Perl_CGI_Einführung}

CGI 1 - Vorwort

Unterkapitelindex

1.1 Vorwort / Autor
1.2 Symbole
1.3 Konventionen

1.1 Vorwort / Autor Autor
Der Autor dieses Dokuments ist Stephan Muller, Ich programmiere seit einigen Jahren in Perl und nutze dabei fast immer die CGI Technik.

Perl ist - meiner Meinung nach - für Webanwendungen die beste & professionelste Programmiersprache, daher kann Ich diese nur empfehlen.

Die Einführung richtet sich an Nicht-Programmierer, alles ist einfach und ausführlich beschrieben. Sie sollten die Kapitel von vorne nach hinten lesen da spätere Kapitel Wissen über frühere Kapitel voraussetzen. Später werden weitere Ergänzungen folgen (wie zb. diverse Module), die Einführung ist aber ideal für Anfänger und vermittelt mindestens genug um eigene Flat Text Datenbanken, Gästebücher, Foren, Counter usw. zu programmieren.

Wenn Sie den Autor & die Weiterentwicklung unterstützen möchten bestellen Sie sich diese Einführung auf CD-Rom.

Bei Fragen nutzen Sie die E-Mail Adresse service@muweb.net oder die Postadresse Stephan Muller, Im Stebich 50, D-53639 Königswinter.

Dieser Text wird mich wahrscheinlich wieder eine Tastatur kosten, da er x Seiten gegliedert in x Kapiteln enthält. Und nun bleibt nur noch eins: Viel Spaß beim Lernen von Perl!

1.2 Symbole
Hier kann etwas schief gehen oder ein Thema ist sehr wichtig
Ein Hinweis versteckt sich. Htitleen Sie die Maus über die jew. Grafiken um mehr Informationen angezeigt zu kriegen.

Starten Sie eines der Beispielprogramme auf diesem Webserver
Laden Sie eines der Beispielprogramme von diesem Webserver auf Ihren Rechner

1.3 Konventionen
Einzelne Kapitel werden durch eine horizontale Linie getrennt.

HTML Code wird in einer grauen Box dargestellt, links werden die Zeilen gezählt:

01 02 03 04 05 06

use CGI;

                                      

                                      my $cgi = new CGI;

                                      my $q = $cgi->param('eingabe');

                                      unless ($q=~/^[\w .!?-]+$/ ){die;}

                                      print $q;