skopp/evil_html.perl

## evil_html.perl
#!/usr/bin/perl

print <<EOF;
Content-type: text/html
Set-Cookie: UserTrackerPRO=4.0; UID=640; expires=Friday, 31-Dec-1999 23:59:59 GMT

<html> <head>
<title>THE EVIL HTML PAGE</title>

<script>

function showtime ()
{

    var d = new Date ();
    var h = d.getHours ();
    var m = d.getMinutes ();
    var s = d.getSeconds ();
    var ampm = (h >= 12) ? "PM" : "AM";
    if (h > 12) h -= 12;
    if (h == 0) h = 12;
    if (m < 10) m = "0" + m;
    var t = "The current evil time is: " + h + ':' + m + ':' + s + ' ' + ampm;
    defaultStatus = t;
    setTimeout ("showtime()", 1000);
}

alert("Welcome to THE EVIL HTML PAGE " + navigator.appName + "/" + navigator.appVersion + " user!");
showtime();

// -->
</script>
</head>
<frameset rows=20%,80%>
<frame src=top.html>

<frameset cols=30%,90%>
<frame src=left.html>
<frame src=right.html>
</frameset>
</frameset>

</html>
EOF

exit 0;
	#!/usr/bin/perl

	print <<EOF;
	Content-type: text/html
	Set-Cookie: UserTrackerPRO=4.0; UID=640; expires=Friday, 31-Dec-1999 23:59:59 GMT

	<html> <head>
	<title>THE EVIL HTML PAGE</title>

	<script>

	function showtime ()
	{

	var d = new Date ();
	var h = d.getHours ();
	var m = d.getMinutes ();
	var s = d.getSeconds ();
	var ampm = (h >= 12) ? "PM" : "AM";
	if (h > 12) h -= 12;
	if (h == 0) h = 12;
	if (m < 10) m = "0" + m;
	var t = "The current evil time is: " + h + ':' + m + ':' + s + ' ' + ampm;
	defaultStatus = t;
	setTimeout ("showtime()", 1000);
	}

	alert("Welcome to THE EVIL HTML PAGE " + navigator.appName + "/" + navigator.appVersion + " user!");
	showtime();

	// -->
	</script>
	</head>
	<frameset rows=20%,80%>
	<frame src=top.html>

	<frameset cols=30%,90%>
	<frame src=left.html>
	<frame src=right.html>
	</frameset>
	</frameset>

	</html>
	EOF

	exit 0;