#!/usr/bin/perl -w

use CGI;
use CGI ":standard";
use CGI::Carp qw{ fatalsToBrowser };

$index = 0;
$cgi = new CGI;
print $cgi->header(),
    $cgi->start_html(),
    $cgi->div({-id=>pagewrap});

 if($index==0) {
     print $cgi->p("Hello"),
 }

print $cgi->end_html();