gaestebuch in perl :-(

A

andi

Grünschnabel
tach @all,

hab vor kurzen ein gaestebuch in perl geschrieben. eigentlich nichts besonderes sollte man denken ......
mein Problem:
der server meldet mir interner Fehler 500 ?!
trotzdem führt er das script aus !
habe das script lokal ausprobiert , ohne Probleme.....

vielleicht hat jemand von euch ne idee.
das script sieht folgender maßen aus:

#!/usr/bin/perl
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;>
<TBODY>
<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;);

danke im voraus
andi
 
kann dir...

leider nicht weiter helfen :(
hab nicht mal den blassesten Schimmer von perl :(

aber wird sich bestimmt jemand finden der sich da nen bissel auskennt
:]
 
der server meldet mir interner Fehler 500 ?!
trotzdem führt er das script aus !



das versteh ich et so ganz
führt er es nun aus oder komt ein fehler? :frage:
 
Zuletzt bearbeitet:
er führt es aus ( datei geschrieben und geändert ) anschließend kommt der fehler ......

es wäre eigentlich alles gut wenn da nicht das dämliche fehlerbild anstatt der abschlußmeldung käme :-(

andi
 
uh..

du musst dem webserver schon sagen, wass du senden willst

print(&quot;Content-type: text/html

&quot;);

behebt das problem :) (beachte die 2 newlines!)

bye
 
dat wars leider auch nicht .... :-(

sch.... provider !

scheint am server zu liegen .....

X(
 
doch, das ist es.. du kannst imho einfach nicht CGI coden..

der content-type muss vor jedem anderen zeichen gesendet werden..

..das problem liegt also zwischen stuhl und keyboard..
 
#!/usr/bin/perl
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;>
<TBODY>
<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;);


..SO tut das! ausser dein script hat noch andere fehler..
 
... stimmt ich kanns nicht, aber ich versuchs, deshalb habe ich auch hier her geschrieben X(

danke für den hinweis, werds sobald ich einen neuen cgi-host habe ( alter hat gekündigt ) probieren.


andi
 
danke werds mal ausprobieren ......

netten gruß zurück

andi
 

Ähnliche Themen

CentOS 5.8 –SQL Abfrage– HTML wird generiert und daraus müssen mehrere Mails versendet werden

Webinterface für Gameserver/Shellscript wird nicht ausgeführt

Onlineumfrage programmieren (mehrseitige HTML Formular an PHP übergeben)

dovecot und postfix Konfiguration Problem

NagiosGrapher 1.7.1 funktioniert nicht

Zurück
Oben