#!/usr/bin/perl -w
 use strict;
BEGIN {
    ++$|;
    local(*FILE);
    open(FILE,'>>./logs/error.log');
    open(STDERR, '>&FILE');
    print(qq[Content-Type: text/html; charset=ISO-8859-1\n\n]);
 }
BEGIN {push(@INC,'./modules')}
use Blank;
print(<<'__success__');
 <?xml version="1.0" encoding='ISO-8859-1'?>
 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Loose//EN"
     "http://www.w3.org/TR/xhtml1/DTD/xhtml1-loose.dtd">
 <html
 xmlns="http://www.w3.org/1999/xhtml"
 xml:lang="en"
 lang="en">
    <head>
       <title>I can use!</title>
       <meta
        http-equiv="Content-Type"
        content="text/html; charset=iso-8859-1" />
        <link
        rel="stylesheet"
        type="text/css"
        href="/css/style.css" />
    </head>
    <body>
       <p>&#160;</p>
      <div class="indent10">
          <strong class="pt14">I can use!</strong>
       </div>
      <p>&#160;</p>
    </body>
 </html>
 __success__
exit;