$xNeTworKx: Variblen übergeben

Beitrag lesen

Hallo,

Also ich hab das zwar schon etwas weiter unten gepostet aber das sieht wohl keiner mehr...

Das stimmt nicht. Meine Postings werden sogar noch nach 4 -5 Tagen mit neuen Replies bestückt =)

hab den code jetzt ein wenig umgeschrieben, mit dem tip der mir in dem anderen Threat gegeben wurde, aber es klappt immer noch nicht...
Hier mein Code:


#!/usr/bin/perl

use strict;
use CGI;

print "Content-type: text/html\n\n";
print $test1;

Ich starte das programm mit
test.pl?test1=test

Wie schon weiter unten angegeben wurde, musst du CGI.pm verwenden.

also :
#!/usr/bin/perl -w

use strict;
use CGI;  # CGI Modul importieren

my $query = new CGI;  #neues CGI Objekt erzeugen
my $test = $query->param('test1'); # CGI.pm zieht den Inhalt von test1 aus dem query string und weist es $test zu.
print $query->header; # Header ausgeben mit CGI.pm
print "$test\n";