#!/usr/bin/perl -wT
use strict;
use CGI;
my $cgi = new CGI;
print "Content-Type: text/html; charset=UTF-8\n";
print "Content-Security-Policy: ".$cgi->param('csp')."\n\n";
my $text = "PASS";
$text = "FAIL" if $cgi->param('should_run') eq 'no';
print "\n";
print "\n";
print "\n";
print "\n";
print "\n";
print "\n";
print "\n";