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");
	} else {
		print "\n";
	}
(;'-')ﾉ ↑に何か問題ありますか?