Tests: added Host header test with control character.
diff --git a/http_host.t b/http_host.t
index 8b9f6ad..989a9fe 100644
--- a/http_host.t
+++ b/http_host.t
@@ -22,7 +22,7 @@
 select STDERR; $| = 1;
 select STDOUT; $| = 1;
 
-my $t = Test::Nginx->new()->has(qw/http rewrite/)->plan(36);
+my $t = Test::Nginx->new()->has(qw/http rewrite/)->plan(37);
 
 $t->write_file_expand('nginx.conf', <<'EOF');
 
@@ -171,6 +171,13 @@
 
 like(http_host_header("localhost\nHost: again", 1), qr/ 400 /, 'host repeat');
 
+TODO: {
+local $TODO = 'not yet' unless $t->has_version('1.21.1');
+
+like(http_host_header("localhost\x02", 1), qr/ 400 /, 'control');
+
+}
+
 ###############################################################################
 
 sub http_host_header {