use strict;
use warnings;
use CGI::Session;
use DBI;

$datasource = 'dbi:mysql:database:hostname';
$user = 'username';
$pass = 'password';


$dbi = DBI->connect($datasource, $user, $pass,
                    { ShowErrorStatement => 1, 
                      RaiseError => 1,
                      PrintError => 1,
                      AutoCommit => 0}));


$session = new CGI::Session(
              "driver:MySQL", 
              $sid,
              {Handle => $dbh}
              ));