chromium/third_party/blink/web_tests/http/tests/encoding/resources/pause-then-switch-encoding-with-title.cgi

#!/usr/bin/perl

use IO::Socket;

$| = 1;

autoflush STDOUT 1;

print "Content-Type: text/html\n\n";

print "<html><head><title>\x59\xfd\x6c\x6d\x61\x7a\x20\xd6\x5a\x44\xdd\x4c</title>";
print "<script>function print(s) { var codes = ''; for (var i = 0; i < s.length; ++i) { codes = codes + '0x' + s.charCodeAt(i).toString(16) + ' '; } alert(codes); }</script>";
print "<script>print(document.title);</script>\n";
sleep 1;
print "<meta charset=windows-1254></head><body><script>print(document.title);</script></body></html>\n";