https://opennet.dev/openforum/vsluhforumID8/5258.html Пишу следующий код:<br>$str_page = "Это моя страничка";<br>if(($ENV{HTTP_ACCEPT_ENCODING} &#124;&#124; '') =~ /gzip/){<br>$str_page = Compress::Zlib::memGzip($str_page);<br> print "Content-Encoding: gzip\n\n";<br>}<br>print "Content-Type: text/html;\n\n";<br>print $str_page;<br>В результате в браузер выдается чистая страница (т.е. ничего). Если убрать строку print"Content-Encoding: gzip\n\n"; то тогда выдает код сжатую страницу (т.е. текст файла gzip). Подскажите что я не так делаю.<br> https://opennet.dev/openforum/vsluhforumID8/5258.html#5 Tue, 25 Sep 2007 00:54:13 GMT Во-первых, - отсутствует заголовок Content-Length<br>Во-вторых, - см. спецификацию http: пустая строка означает конец заголовка. Все, что после - данные (в коде специально выделено)<br><br>--------------<br>$str_page = "Это моя страничка"; <br><br>if( exists( $ENV{HTTP_ACCEPT_ENCODING} ) && $ENV{HTTP_ACCEPT_ENCODING} =~ /gzip/){ <br> $str_page = Compress::Zlib::memGzip($str_page); <br> print "Content-Encoding: gzip", "\n"; <br>} <br># никогда не помешает, особенно с бинарными данными<br>print "Content-Length: ", length($str_page), "\n";<br>print "Content-Type: text/html;", "\n";<br># пустая строка - конец заголовка<br>print "\n"; <br><br># вываливаем данные<br>print $str_page; <br><br><br> https://opennet.dev/openforum/vsluhforumID8/5258.html#4 Mon, 24 Sep 2007 23:21:13 GMT &gt;Пишу следующий код: <br>&gt;$str_page = "Это моя страничка"; <br>&gt;if(($ENV{HTTP_ACCEPT_ENCODING} &#124;&#124; '') =~ /gzip/){ <br>&gt; $str_page = Compress::Zlib::memGzip($str_page); <br>&gt; print "Content-Encoding: gzip\n\n"; <br>&gt;} <br><br>else {<br>&gt;print "Content-Type: text/html;\n\n"; <br><br>}<br> https://opennet.dev/openforum/vsluhforumID8/5258.html#3 Sun, 23 Sep 2007 17:27:04 GMT &gt;Я на перле пишу. И мне хотелось бы на нем и сделать <br>&gt;сжатие. Если это конечно возможно. <br><br>Извиняюсь, не вчитался. На перле вообще всё возможно. Хоть я так и не понял где у вас ошибка, но зато нашёл такую страницу:<br><br>http://cpan.uwinnipeg.ca/htdocs/CGI-WebGzip/CGI/WebGzip.pm.html<br><br> https://opennet.dev/openforum/vsluhforumID8/5258.html#2 Sun, 23 Sep 2007 12:57:46 GMT &gt;&gt; print "Content-Encoding: gzip\n\n"; <br>&gt;<br>&gt;По-моему тут нужен один \n <br><br>Не помогает.<br>&gt;А вообще, не нужно изобретать велосипед. Смотрите в сторону буферизации вывода <br>&gt;в php. <br><br>Я на перле пишу. И мне хотелось бы на нем и сделать сжатие. Если это конечно возможно.<br><br> https://opennet.dev/openforum/vsluhforumID8/5258.html#1 Sun, 23 Sep 2007 12:43:40 GMT &gt; print "Content-Encoding: gzip\n\n"; <br><br>По-моему тут нужен один \n<br><br>А вообще, не нужно изобретать велосипед. Смотрите в сторону буферизации вывода в php.<br>