checkpoint Blink-side work to use Apache on Windows

LayoutTests/http/tests/resources/post-and-verify.cgi

-#!/usr/bin/perl -w
+#!/usr/bin/perl -wT
 
 print "Content-type: text/plain\n\n"; 
 
 if ($ENV{'REQUEST_METHOD'} eq "POST") {
     if ($ENV{'CONTENT_LENGTH'}) {
         read(STDIN, $postData, $ENV{'CONTENT_LENGTH'}) || die "Could not get post data\n";
     } else {
         $postData = "";
     }
 
     @list = split(/&/, $ENV{'QUERY_STRING'});
     foreach $element (@list) {
         ($key, $value) = split(/=/, $element);
         $values{$key} = $value;
     }
 
     open FILE, $values{'path'} || die("Could not open file\n");
     seek FILE, $values{'start'}, 0;
     read FILE, $expectedData, $values{'length'};
     close(FILE);
 
     if ($postData eq $expectedData) {
         print "OK";
     } else {
         print "FAILED";
     }
 } else {
     print "Wrong method: " . $ENV{'REQUEST_METHOD'} . "\n";
 }