package ABCDB;

our $DSN      = 'Driver=FreeTDS;ServerName=SqlServer;Database=ABCDAT';
our $User     = 'User';
our $Password = 'Password';

our $Attributes =
  { LongReadLen => 65535, LongTruncOk => 1, odbc_query_timeout => 30 };

##</code><code>##

my $dbh = DBI->connect ( "dbi:ODBC:$ABCDB::DSN", $ABCDB::User,
  $ABCDB::Password, $ABCDB::Attributes );