1 files changed, 16 insertions, 0 deletions
diff --git a/t/live/apache-http10.t b/t/live/apache-http10.t
new file mode 100644
index 0000000..f6cf6bc
--- /dev/null
+++ b/t/live/apache-http10.t
@@ -0,0 +1,16 @@
+#!perl -w
+
+use strict;
+use Test;
+plan tests => 1;
+
+use LWP::UserAgent;
+my $ua = LWP::UserAgent->new;
+
+require HTTP::Request;
+my $req = HTTP::Request->new(TRACE => "http://www.apache.org/");
+$req->protocol("HTTP/1.0");
+my $res = $ua->simple_request($req);
+ok($res->content, qr/HTTP\/1.0/);
+
+$res->dump(prefix => "# ");