In the module:
sub george_connect {
    return DBI->connect('yada yada');
}
In the main script:
my $dbh = george_connect;