use CGI::Session;
use DBI;
use XML::Simple qw(:strict);
$database = 'gnutube';
$host = 'localhost';
$user = 'root';
$pass = '';