Hi,
#!/usr/local/bin/perl
besser:
#!/usr/local/bin/perl -w
use strict;
Dann hättest Du auch erfahren, daß Du $textfeld zu deklarieren vergessen hast.
print "Content-type: text/html\n\n";
Dein (korrekter) HTTP-Header ist durch die Leerzeile ("\n\n") beendet worden.
print "REFRESH 111; URL=$textfeld">
Dies ist bereits der Body; und nebenbei bemerkt ist das ungültiges HTML.
Übrigens ist die Perl-Syntax falsch, wie Dir
perl -c refresh.pl
auf Deinem heimischen PC verraten hätte.
1;
Die Zeile ist nicht nötig, sofern Du das Script nicht z.B. mit require einbindest.
Leider klappt es nicht und der server bringt den Fehler 500.
Die Rechte sind richtig vergeben...
Nicht raten, nachschauen! Woher der 500er kommt, steht im Error-Log Deines Servers - alles andere ist vertane Zeit!
Wer kann mir helfen und mir nen Tip geben wie ich
die Variable "textfeld" richtig in den Refresh Befehl einbaue ?
Lies dazu auf Deinem Rechner
perldoc CGI
Beispiel:
#!/usr/local/bin/perl -w
use strict;
use CGI ':standard';
print header, start_html('test'), p('Eingegeben wurde: ' . param('textfeld')), end_html;
Vermutlich meinst Du aber:
#!/usr/local/bin/perl -w
use strict;
use CGI ':standard';
print redirect(param('textfeld'));
Es soll erreicht werden, dass eine Seite geladen wird, die
vorher eingeben wurde, und zwar mit dem Refresh 111 aktualisiert
wird. Das ganze hat den Zweck ein lästiges Timeout zu umgehen.
Ach so. Nun, dann ist die zweite Variante nicht die richtige, sondern eine Variation der ersten. Siehe dazu (wie gesagt)
perldoc CGI
Ein bißchen Eigenleistung muß ja immerhin auch sein ;-)
Cheatah