Thread Gästebuch funktioniert nicht (13 answers)
Opened by leonie_sonia at 2012-10-15 18:03

leonie_sonia
 2012-10-15 18:03
#162638 #162638
User since
2012-10-15
1 Artikel
BenutzerIn
[default_avatar]
Hallo zusammen,
ich bin ein völliger Perlanfänger und auf eure Hilfe angweissen. Vor kurzem habe ich mich mal an einem Skript ausprobiert für eine Webseite, jedoch sitze ich da nun schon Wochen dran, und komm nicht weiter, ich verstehe einfach nicht wo die fehler in dem Skript sind.

BITTE Helft mir !

Das Problemskript:

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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44

#!/usr/bin/perl
#BVB fan Page von Kai
print" Content-type:text/html\n\n"
<Formatieung /->
<!--head//-->
print"<html><head><title>BVB-FAN!</title></head>\n";
<style type="text/css">
<!--
.Gelb {colour:#FF00F0}
p.fett{font.weoght:bold;}
//-->
</style>
<linke rel="favico icon"type="image/x-icon"href="/favicon.ico">
<title>Abfrage Benutzername und Passwort</title>
<form action="/cgi-bin/passwort.cgi" method=POST>
Benuzername: <input type="text" name="name" size="BVB"><br>
Passwort: <input type="text" name="passwort" size="09" /><br>
<input type="submit" value="Login">
<input type="RESET" value="Löschen"></form><br><br></body></html>

print(&quot;Content-type: text/html&quot;);
open (db, &quot;< /kunden/homepages/30/d11176583/htdocs/werftler/gaestebuch/gaestebuch.html&quot;);
@eingabe = <db>;
close (db);
read (STDIN, $formdaten, $ENV{&acute;CONTENT_LENGTH&acute;});
@formfelder = split (/&/, $formdaten);
($x[1],$author) = split (/=/, $formfelder[0]);
($x[2],$email) = split (/=/, $formfelder[1]);
($x[3],$homepage) = split (/=/, $formfelder[2]);
($x[4],$text) = split (/=/, $formfelder[3]);
$_ = &quot;@eingabe&quot;;
s {<!--daten>}#<!--daten><table border=&quot;1&quot;><body>
<tr><td>Text:</td><td width=&quot;590&quot;>$text</td></tr><tr><td>Author:</td><td>$author</td></tr><tr><td>Email:</td><td>$email</td></tr><tr><td>Homepage:</td><td>$homepage</td></tr></tbody></table><br><br><hr><hr><br><br>#;
open (db1, &quot;> /kunden/homepages/30/d11176583/htdocs/werftler/gaestebuch/gaestebuch_neu.html&quot;);
print db1 (&quot;$_&quot;);
close (dbx);
#rename &quot;/kunden/homepages/30/d11176583/htdocs/werftler/gaestebuch/gaestebuch_neu.html&quot;, &quot;/kunden/homepages/30/d11176583/htdocs/werftler/gaestebuch/gaestebuch.html&quot;;
print STDOUT (&quot;<HTML><HEAD></HEAD><BODY><H1 align=center>Danke für Ihren Eintrag</h1><a href=www.andis-homepage.de/werftler/gaestebuch/gaestebuch.html>zurück</a></body></html>&quot;);
print"<body><h1><p>Der Ballspielverien Borussia 09 e.V Dortmund <b>Text!</b></p><h1><body></html>\n<;
<p> kurz Borussia Dortmund, BVB oder BVB 09 <i>Text!</i></p>
<p> ist ein Verein aus Dortmund. <i>Text!</i></p>
<p>Das Maskotchen des BVB ist eine Biene Namens Emma <u>Text!</u></p><br><img src= "Emma.jpg">
<p> um mehr über Bienen zu erfahren<i>Text!</i></p>
<a href="http: //www.Bienen.de/.html">Verlinkung</a>





DANKE

modedit Editiert von GwenDragon: Titel ersetzt; Perl-Code in CODE-Tags
Last edited: 2012-10-15 19:28:31 +0200 (CEST)

View full thread Gästebuch funktioniert nicht