Index: third_party/WebKit/LayoutTests/http/tests/inspector-protocol/network/resources/post-echo.pl |
diff --git a/third_party/WebKit/LayoutTests/http/tests/inspector-protocol/network/resources/post-echo.pl b/third_party/WebKit/LayoutTests/http/tests/inspector-protocol/network/resources/post-echo.pl |
new file mode 100755 |
index 0000000000000000000000000000000000000000..e224ad75e2a4f1f3e8f2b4d2a749b827764e44ff |
--- /dev/null |
+++ b/third_party/WebKit/LayoutTests/http/tests/inspector-protocol/network/resources/post-echo.pl |
@@ -0,0 +1,9 @@ |
+#!/usr/bin/perl |
+print "Content-type: text/plain\r\n\r\n"; |
+if ($ENV{'REQUEST_METHOD'} eq "POST") { |
+ read(STDIN, $request, $ENV{'CONTENT_LENGTH'}) |
+ || die "Could not get query\n"; |
+ print $request; |
+} else { |
+ print "Wrong method: " . $ENV{'REQUEST_METHOD'} . "\n"; |
+} |