#!/usr/bin/perl -Tw
use strict;

use DBI;
use CGI::Pretty;
use CGI::Carp qw(fatalsToBrowser);

print "Content-type: text/html\n\n";
print "This is a URL test"; 


##</code><code>##

print $query->header,
		$query->start_html(-title => $headertitle,
        					-head => meta({-http_equiv => 'Content-Type', -content => 'text/html'}),
        					-meta => { 'description' => $metadesc, 'keywords' => $metakeyw },
        					-style => {'src' => $cssfile},

		);