|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Dmitry A. Nikitin 2:5020/400 13 Apr 2005 02:28:21
To : All
Subject : Странные вещи творятся.
--------------------------------------------------------------------------------
После перехода на perl-5.8.3 и apache-2.0.52(Fedora) браузер mozilla-1.7.6 стало
твориться что-то неладное.
Hапример, код:
$order = "$input{email}\&$input{url}\&$input{private}\&$input{comment}";
open ORDER, ">/tmp/file.$$.txt" or die $!;
print ORDER "$order\n";
close ORDER;
Стал создавать два файла в каталоге /tmp.
Скрипт получает инфу от браузера
if ($ENV{'QUERY_STRING'}) {$buffer = $ENV{'QUERY_STRING'};}
else {read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});}
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /; # заменяем плюсы на пробелы
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ s/<!--(.|\n)*-->//g;
$input{$name} = $value;
Если запрос делать через IE 6.0.2800, то всё работает как надо.
Hа perl-5.6.0 и apache-1.3.20 тоже всё работало.
Где чего сломалось?
--
mailto:dmitry@sbor.spb.su
--- ifmail v.2.15dev5.3
* Origin: Home Inc. (2:5020/400)
Вернуться к списку тем, сортированных по:
|
