[XSS Auditor] Truncate data URLs at quotes
[WebKit-https.git] / LayoutTests / http / tests / security / xssAuditor / resources / echo-property.pl
1 #!/usr/bin/perl -wT
2 use strict;
3 use CGI;
4
5 my $cgi = new CGI;
6
7 print "Content-Type: text/html; charset=UTF-8\n\n";
8
9 print "<!DOCTYPE html>\n";
10 print "<html>\n";
11 print "<body foo=\"";
12 print $cgi->param('q');
13 if ($cgi->param('clutter')) {
14     print $cgi->param('clutter');
15 }
16 print "\">\n";
17 print "<script>var y = 123;</script>";
18 print "</body>\n";
19 print "</html>\n";