String an CGI

[xwolf]

Hi,

ich möchte meinem CGI eine Info schicken. Das Problem liegt nicht im CGI, vielmehr weiß ich nicht, wie ich daß mit HTML oder JavaScript mache. Der Browser soll keine neue Seite o.ä erwarten, einfach über einen Link oder Buttton einen String an den Server bzw. CGI schicken - fertig.

Nix fertig.
So geht CGI nicht.
Bei CGI gibt es immer eine Rückgabe und das muss auch so sein.

Was du wohl willst, ist, dass die Seite wo du irgendwas abschickst, erhalten bleibt.
Dies musst du anders loesen.
Die einfachste Variante ist: Nachdem das Skript ausgefuehrt wurde, laesst du es ueber eine Redirection wieder auf die ursprungsseite zurueckleiten.

Also in etwa so:

#!/usr/bin/perl

my $file = "blubberlutsch.txt";
my $string = $ENV{'QUERY_STRING'} || "NIX";
mu $url = $ENV{'HTTP_REFERER'} || "http://$ENV{'SERVERNAME'}";

if (length($string) > 1024) {
  $string = substr($string,0,1024);
}

open(f1,">>$file");
  print f1 "$string\n"
close f1;

print "Status: 302 Found\n";
print "Location: $url\n";
print "URI: <$url>\n";
print "Content-Type: text/html\n\n";

exit;

Ciao,
  Wolfgang