#!/usr/bin/perl -Tw
use lib '/home/baz/public_html';

use strict;
$| = 1;

use CGI::Carp "fatalsToBrowser";
use CGI ":all";
use DBI;

use HTML::TokeParser;
use MyVars qw($footer);