4 # use this if you keep a copy of DBD::Sybase linked to FreeTDS somewhere else
6 if (my $lib_dirs = $ENV{DBICTEST_MSSQL_PERL5LIB}) {
7 unshift @INC, $_ for split /:/, $lib_dirs;
12 use dbixcsl_common_tests;
13 use dbixcsl_mssql_extra_tests;
15 my $dsn = $ENV{DBICTEST_MSSQL_DSN} || '';
16 my $user = $ENV{DBICTEST_MSSQL_USER} || '';
17 my $password = $ENV{DBICTEST_MSSQL_PASS} || '';
19 my $tester = dbixcsl_common_tests->new(
21 auto_inc_pk => 'INTEGER IDENTITY NOT NULL PRIMARY KEY',
22 default_function => 'getdate()',
23 default_function_def => 'DATETIME DEFAULT getdate()',
26 password => $password,
27 extra => dbixcsl_mssql_extra_tests->extra,
30 if( !$dsn || !$user ) {
31 $tester->skip_tests('You need to set the DBICTEST_MSSQL_DSN, _USER, and _PASS environment variables');