Sign in
webkit
/
WebKit
/
a505795d6604e65c53d1725ad4e11f5541e21004
/
.
/
LayoutTests
/
http
/
tests
/
security
/
xssAuditor
/
resources
/
echo-inner-tag.pl
blob: da1fc9a821a0d20343f62ed18f4e3681137a8508 [
file
] [
log
] [
blame
]
#!/usr/bin/perl -wT
use
strict
;
use
CGI
;
my
$cgi
=
new CGI
;
print
"Content-Type: text/html; charset=UTF-8\n\n"
;
print
"<!DOCTYPE html>\n"
;
print
"<html>\n"
;
print
"<body "
;
print
$cgi
->
param
(
'q'
);
print
">\n"
;
print
"</body>\n"
;
print
"</html>\n"
;