Opened by Kevin at 2011-07-25 21:49
Ich will den erhaltenen Request nahezu unverändert mit IO::Socket::INET an einen anderen Server weiterschicken. (Host und abgefragete Seite muss ich nätürlich ändern).
ich hab mir jetz folgenden code gebastelt für den fall das alle Variablem alls HTTP_name in %ENV stehen:
Alle gesuchten Variablen sollten dann ohne HTTP_ in request stehen.
Konnte das Script leider noch nicht testen.
schon mal vielen Dank,
Kevin
Last edited: 2011-07-26 07:43:46 +0200 (CEST)
ich hab mir jetz folgenden code gebastelt für den fall das alle Variablem alls HTTP_name in %ENV stehen:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
my @envkeys= keys %ENV;
my $i;
my %request={};
for ($i=0;$i<@envkeys;$i++)
{
if($envkey[i]=~ /^HTTP_(.*)/)
{
$request{$1}=$ENV{$envkey[i]};
}
}
Alle gesuchten Variablen sollten dann ohne HTTP_ in request stehen.
Konnte das Script leider noch nicht testen.
schon mal vielen Dank,
Kevin
Last edited: 2011-07-26 07:43:46 +0200 (CEST)