Perl-Script mit Link aufrufen

[rainer]

hi ho

( <a href="script.pl?var=value"> )
Das Script scheint diese Variable aber nicht zu übernehmen.

Wie uebernimmt dein script die variable (Code bitte)

Hier ist der Code:

#!/usr/bin/perl -w

$query_string = ();
$key_value_pairs = ();
%FORM_SUCHE = ();
(*FORM_SUCHE) = @_;
$request_method = $ENV{'REQUEST_METHOD'};
if($request_method eq "GET")
{
$query_string = $ENV{'QUERY_string'};
}
else
{
read (STDIN, $query_string, $ENV{'CONTENT_LENGTH'});
}
@key_value_pairs = split(/&/, $query_string);
foreach $key_value (@key_value_pairs)
{
($key, $value) = split(/=/, $key_value);
$value =~ tr/ +/ /;
$value =~ s/%([\dA-Fa-f][\dA-Fa-f])/pack ("C", hex ($1))/eg;
$value =~ s/\n/<br>/g;
$FORM_SUCHE{$key} = $value;
}

rainer