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