Index: LayoutTests/http/tests/xmlhttprequest/resources/xml-small-chunks.cgi |
diff --git a/LayoutTests/http/tests/xmlhttprequest/resources/xml-small-chunks.cgi b/LayoutTests/http/tests/xmlhttprequest/resources/xml-small-chunks.cgi |
new file mode 100755 |
index 0000000000000000000000000000000000000000..dfeab9381860548f0e150db8e4e67d1d13f98fa6 |
--- /dev/null |
+++ b/LayoutTests/http/tests/xmlhttprequest/resources/xml-small-chunks.cgi |
@@ -0,0 +1,15 @@ |
+#!/usr/bin/perl |
+ |
+use IO::Socket; |
+ |
+$| = 1; |
+ |
+autoflush STDOUT 1; |
+ |
+print "Content-Type: text/xml; charset=utf-8\n\n"; |
+ |
+print '<?xml version="1.0" encoding="UTF-8"?>'; |
+for (my $i = 0; $i < 5; $i++) { |
+ print "<test></test>"; |
+ sleep 1; |
+} |