CGI-Beispiele

[Jan S.]

Hallo

hat jemand kleine Beispiel-CGI's, an denen man gut die Funktionsweise von CGI sieht? Ich suche vor allem einfache kleine Scripte, da ich mich mit CGI noch nicht auskenne.

Jan

[Jules Winfield]

hi jan,

zur einführung in perl + kleine scripte schau doch mal in:

http://www.tekromancer.com/perl/inhalt.html

rein. Dort wird dir erstmal weiter geholfen

gruß
walter

[email protected]

Hallo,
ich lese z.Zt. das Buch "Perl in 21 Tagen" von Laura Lemay, erschienen im Markt&Technik-Verlag, ISB N 3-8272-22038-6 DM 79,80,
mit vielen Beispielen. Auf der Buch-CD sind alle Beispiele und das <b><font color="red">ganze Buch in HTML</font></b> (als Zip jew. 460kB und 1MB, mail' mir mal deine eMail-Adresse an: [email protected]). Das Thema CGI wird in einem Kapitel behandelt, aber wenn Du noch Anfänger bist, ist es vielleicht ganz gut das Buch mal durchzuarbeiten

[Christian Marquardt]

Bitte sehr:

Das Script liest deine Daten aus den Formularfelder und stellt sie dir
in einem Hash in der Form:

$Form{'feldname aus dem HTML-Fomular'};

zur Verfügung. Dabei spielt die Methode (GET/POST) keine Rolle.

Beispiel: $nachname=$FORM{'name'};

<pre>
if($ENV{'REQUEST_METHOD'}eq"POST")
{
read(STDIN,$buffer,$ENV{'CONTENT_LENGTH'});
}
else
{
$buffer=$ENV{'QUERY_STRING'};
}
@pairs = split(/&/, $buffer);
foreach $pair (@pairs)
{
($name,$value)=split(/=/,$pair);
$value=~ tr/+/ /;
$value=~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;
$value=~ s/<!--(.|\n)*-->//g;
$value=~ s/<([^>]|\n)*>//g;
$FORM{$name}=$value;
}
</pre&gt

#!/usr/bin/perl

print " Ich empfehle Dir folgendes Buch von O'Reilly (in Deutsch) für 59,-\n\n";

print " \"Einführung in Perl\" ISBN 3-89721-105-X\n\n";

system ( "echo \"Bevor man mit CGI anfängt, sollte man die\" " );

print "\n Grundlagen von Perl beherschen ...";

print "Viel " . "Spass " . "beim " . "Lernen\n";

#

&#10