#!/usr/local/bin/perl -w
# -*- mode: cperl; -*-

{ local($!) = 1; print "Content-Type: text/html\n\n"; }

print <<END;
<HTML>
<HEAD>
<TITLE>Coolpics</TITLE>
<META NAME="keywords" CONTENT="Free,xxx,Movies,Pics,Pic,Bilder,pics,pic,Tumbs">
<META NAME="description" CONTENT="Free Pics,Movies,Babes,TeensEbony">
<META NAME="robots" CONTENT="INDEX, FOLLOW">
<META NAME="revisit-after" CONTENT="10 days">
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">
<script language="JavaScript">
if(top.frames.length > 0)
top.location.href=self.location;
</script>
</HEAD>

<FRAMESET ROWS="100%,*" FRAMEBORDER="NO" BORDER="0" FRAMESPACING="0">
<FRAME NAME="main_frame1" SRC="http://localhost:80/cgi-bin/lwp/frame1">
<FRAME NAME="main_frame2" SRC="http://localhost:80/cgi-bin/lwp/frame2">
</FRAMESET>

<NOFRAMES>
<BODY bgcolor="#FFFFFF" text="#000000">
<a href="/cgi-bin/lwp/noframe"> No Frames</a>
</BODY>
</NOFRAMES>
</HTML>'
END

