Name: Anonymous 2010-04-03 11:58
#!/usr/bin/perl
use strict;
use warnings;
use CGI qw/:standard/;
print header,
start_html( "What is this shit" ),
start_form,
hidden( -name => "parameter", -default => "this does not matter" ),
end_form,
end_html;http://localhost/retard.cgi?parameter=fuckshit
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en-US" xml:lang="en-US">
<head>
<title>What is this shit</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
</head>
<body>
<form method="post" action="http://localhost/retard.cgi?parameter=fuckshit" enctype="multipart/form-data">
<input type="hidden" name="parameter" value="fuckshit" /></form>
</body>
</html>