print "Content-type: text/html\n";
> 	if($COMMAND{'gzip'} eq 'checked'
> 	    && $ENV{'HTTP_ACCEPT_ENCODING'} =~ /gzip/) {
> 		if($ENV{'HTTP_ACCEPT_ENCODING'} =~ /x-gzip/) {
> 			print "Content-encoding: x-gzip\n\n";
> 		} else {
> 			print "Content-encoding: gzip\n\n";
> 		}
> 		open(STDOUT, "| /bin/gzip -1 -c");
> 		print "<!-- gzip_ed -->\n";
> 	} else {
> 		print "\n";
> 		print "<!-- no gzip_ed -->\n";
> 	}

(;'-')ﾉ です。


参考：2000/02/25(金)04時01分13秒