Übergabe von Texte mit & Zeichen

[opi]

Hallo,

sorry !

my @argv=split /&/,$ENV{'QUERY_STRING'};
my %arg;
foreach(@argv) {
   my ($name,$value)=split /=/,$_;
   $targ=~tr/+/ /;
   $value=~s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
   $arg{$name}=$value;
}

my @argv=split /&/,$ENV{'QUERY_STRING'};
my %arg;
foreach(@argv) {
   my ($name,$value)=split /=/,$_;
   $value=~tr/+/ /;
   $value=~s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
   $arg{$name}=$value;
}

Greez,
opi

Für Syntaxfehler bitte ich um Entschuldigung!