#! /usr/bin/perl -wT
	# intro7b.cgi - use WebDB to connect
	use strict;			# FORCE ALL VARIABLES TO BE DECLARED BEFORE USE
	use DBI;			# IMPORT THE DATABASE INTERFACE METHODS
	use CGI qw(:standard);
	use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
	use lib qw(/home/gmacfadd/public_html/cgi-bin/dubois);
	use WebDB;

	my ($dbh, $sth, $count, $user);	# DECLARE VARIABLES

	$dbh = WebDB::connect_with_option_file();