nicht angemeldet
Welchen Input im script, um ..folgenden output zu haben
Hallo,
ich hätte gerne in einer von einem perl-script generierten Seite im head bereich z.B. folgende Angaben:
<meta NAME="language" CONTENT="de">
<meta NAME="language" CONTENT="ger">
<meta name="revisit-after" content="10 days">
<meta name="ROBOTS" content="FOLLOW">
<meta NAME="robots" CONTENT="all">
Create the message
if ($FORM{'subject'} eq "") { $FORM{'subject'} = "[ No Subject ]"; }
if ($FORM{'name'} eq "") { $FORM{'name'} = "anonymous"; }
open (FILE, ">$post/$message_num.html");
print FILE "<html><head><title>$FORM{'subject'}</title></head><body>\n";
&sig;
$message = &message_html;
print FILE "$message\n";
print FILE "<center><hr width="70%"></center>\n";
print FILE "<font size="+2">Antworten:</font>\n<ul><!-- <a href="$posturl/$message_num.html"> -->\n";
print FILE "</ul>\n";
print FILE "<center><hr width="70%"></center>\n";
print FILE "<font size="+2">Antwort verfassen:</font>\n";
&posthtml;
if ($FORM{'reply'} eq "yes") { $FORM{'history'} .= "x"; }
$FORM{'history'} .= $message_num;
print FILE "<input type="hidden" name="history" value="$FORM{'history'}">\n";
print FILE "<input type="hidden" name="forum" value="$FORM{'forum'}">\n";
print FILE "<input type="hidden" name="required" value="$FORM{'require'}">\n";
print FILE "<input type="hidden" name="reply" value="yes">\n";
print FILE "<input type="hidden" name="omessage" value="$FORM{'body'}">\n";
print FILE "<input type="hidden" name="oname" value="$FORM{'name'}">\n";
print FILE "<input type="hidden" name="oemail" value="$FORM{'email'}">\n";
&sig;
print FILE "</form></body></html>\n";
close(FILE);
# put a link on any message this is a reply to
-
Hallo,
ich hätte gerne in einer von einem perl-script generierten Seite im head bereich z.B. folgende Angaben:
<meta NAME="language" CONTENT="de">
<meta NAME="language" CONTENT="ger">
<meta name="revisit-after" content="10 days">
<meta name="ROBOTS" content="FOLLOW">
<meta NAME="robots" CONTENT="all">Create the message
if ($FORM{'subject'} eq "") { $FORM{'subject'} = "[ No Subject ]"; }
if ($FORM{'name'} eq "") { $FORM{'name'} = "anonymous"; }
open (FILE, ">$post/$message_num.html");print FILE "<html><head><title>$FORM{'subject'}</title></head>\n";
print FILE '<meta NAME="language" CONTENT="de">\n';
...and so on...print FILE "<body>\n";
&sig;
$message = &message_html;
print FILE "$message\n";
print FILE "<center><hr width="70%"></center>\n";gerhard
-
Hi Gerhard,
Danke schon wieder an Dich, versuch ich gleich.
Danke, Cu,
Micki
-
kleinen fehler entdeckt: die meta-tags müssen innerhalb des heads stehen
sorry, gerhard
-
kleinen fehler entdeckt: die meta-tags müssen innerhalb des heads stehen
sorry, gerhard
Hi nochmal,
jaja, das hatte ich in der Tat auch schon bemerkt, aber da stimmt noch etwas nicht, weil folgendes kommt raus:
<meta NAME="language" CONTENT="de">\n<meta NAME="robots" CONTENT="follow">\n<meta NAME="revisit-after" CONTENT="10 days">\n</head><body>
Das \n als Zeilenumbruch klappt irgendwie nicht, ansonsten klappts gut.
Erbitte nochmal Deine Hilfe.
micki
-
in der tat:
print '' tut die escape-zeichen nicht interpretiern
also, \n soll ein linebreak sein (macht den code schöner) -> laß es in den print '' weg und setze dazwischen print FILE "\n" -> macht linebreaks
oder du machst print FILE "<meta name="bla" content="bla">\n";gerhard
-
in der tat:
print '' tut die escape-zeichen nicht interpretiern
also, \n soll ein linebreak sein (macht den code schöner) -> laß es in den print '' weg und setze dazwischen print FILE "\n" -> macht linebreaks
oder du machst print FILE "<meta name="bla" content="bla">\n";gerhard
Danke,Danke,Danke
...Gerhard hast du auch mal in die Frage, die ein paar zeilen höher von mir steht, geschaut??
cu
micki
-
-
-
-
-