blob: 7f20fb80f29b6cba4ce658befbf4a9be323e5863 [file] [log] [blame]
#!/usr/bin/perl -wT
use strict;
print "Content-Type: text/html\n";
print "Access-Control-Allow-Origin: *\n";
print "Cache-Control: no-store\n\n";
print <<DONE
{ "header": "$ENV{"HTTP_UPGRADE_INSECURE_REQUESTS"}" }
DONE