Commit | Line | Data |
fe67d343 |
1 | use strict; |
2 | use lib qw(t/lib); |
3 | use dbixcsl_common_tests; |
4 | |
1765b8a0 |
5 | # you need maxConnect=256 in your DSN for this test to pass |
6 | |
fe67d343 |
7 | my $dsn = $ENV{DBICTEST_SYBASE_DSN} || ''; |
8 | my $user = $ENV{DBICTEST_SYBASE_USER} || ''; |
9 | my $password = $ENV{DBICTEST_SYBASE_PASS} || ''; |
10 | |
11 | my $tester = dbixcsl_common_tests->new( |
7cb9244f |
12 | vendor => 'sybase', |
fe67d343 |
13 | auto_inc_pk => 'INTEGER IDENTITY NOT NULL PRIMARY KEY', |
14 | dsn => $dsn, |
15 | user => $user, |
16 | password => $password, |
7cb9244f |
17 | # This is necessary because there are too many cursors open for transactions on |
18 | # insert to work. |
19 | connect_info_opts => { on_connect_call => 'unsafe_insert' } |
fe67d343 |
20 | ); |
21 | |
22 | if( !$dsn || !$user ) { |
23 | $tester->skip_tests('You need to set the DBICTEST_SYBASE_DSN, _USER, and _PASS environment variables'); |
24 | } |
25 | else { |
26 | $tester->run_tests(); |
27 | } |