nicht angemeldet
Hey vielen Dank...
Ihr seid echt schnell...
Ich weiss, dass einige Fehler drin sind,
aber ich hab einfach kein optimum an Info
im Web gefunden. Manche Dinge sind zu einfach zu
ausführlich, andere zu lasch und lassen Infos weg.
Ich lerne gerne an Beispielen und am besten nach
Trail & Error Prinzip.
Ich hab einige Beispiele gesehen, aber meistens
wird dann an entscheidender Stelle etwas verschwiegen,
was mir dann fehlt. So wäre eine gute Lernhilfe
eine Webseite, die immer Aufruf & Ergebnis sowohl
auf einer konkreten Webseite, als auch im Source
zeigt. Naja ich kenne das von DHTML Scripten und
fand das recht praktisch...
- Ein Problem noch zu "»» print "REFRESH 111; URL=$textfeld">"
Ich dachte mir, dass das nicht richtig ist.
Ursprünglich war das im HEAD der Meta Tag
<meta HTTP-EQUIV="REFRESH" CONTENT="111; URL=http://www.webseite.de">
Aber ich weiss nicht, wie man das transformiert ?
Ich bin da von der Änderung des "Content-Type" ausgegangen...
Die ja aus:
"<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">" zu ~ dem macht:
"print "Content-type: text/html\n\n";"
-Das mit der Verwechselung von cgi und pl hab ich schon gemerkt...
Die Server Logs von meinem FREE Webspace haben leider nichts
ergeben.
-Der Perl Pfad von VirtualAve ist #!/usr/local/bin/perl
das müsste stimmen
-Hier passiert's ;) <- Muss ich mir merken ;)
So hier nun die derzeitige Fassung....
leider kommt dann nur eine Seite mit dem TITEL "TEST"...
Der META TAG Refresh und der Wert der Url die eingegeben wurde
kam ned an...
Der Server Fehler lag wohl an meiner Dummheit... ich denke
ich habs ausversehen binary geuploaded 0:D
"print header, start_html('test'), p('Eingegeben wurde: ' . param ('textfeld')), end_html;"
gibt korrekt den TEXT aus...aber das ist ja nicht das Ziel...
Es soll ja der üble Meta Tag
<meta HTTP-EQUIV="REFRESH" CONTENT="111; URL=http://www.webseite.de">
geniert werden...
Und ich hab keine Ahnung wie der im Script heissen müsste...
Das hat leider nicht geklappt---
#!/usr/local/bin/perl -w
use strict;
use CGI qw/:standard/;
my $textfeld = param('textfeld');
print "Content-type: text/html\n\n";
print "REFRESH 111; URL=$textfeld">
print "<html><head><title>test</title></head>\n";
print "</body></html>\n";
Es wurde nur der Titel TEST ausgeben und der Refresh erschien
gar nicht...
Vielen Dank auf jeden Fall für die superschnell Hilfe !!!
Gruss aus dem gewitterigen Freiburg
Sunboy