Commit | Line | Data |
e7262300 |
1 | use strict; |
2 | use lib qw(t/lib); |
3 | use dbixcsl_common_tests; |
4 | |
5 | my $dsn = $ENV{DBICTEST_ORA_DSN} || ''; |
6 | my $user = $ENV{DBICTEST_ORA_USER} || ''; |
7 | my $password = $ENV{DBICTEST_ORA_PASS} || ''; |
8 | |
9 | my $tester = dbixcsl_common_tests->new( |
10 | vendor => 'Oracle', |
11 | auto_inc_pk => 'SERIAL NOT NULL PRIMARY KEY', |
12 | dsn => $dsn, |
13 | user => $user, |
14 | password => $password, |
78b7ccaa |
15 | no_auto_increment => 1, |
e7262300 |
16 | ); |
17 | |
18 | if( !$dsn || !$user ) { |
19 | $tester->skip_tests('You need to set the DBICTEST_ORA_DSN, _USER, and _PASS environment variables'); |
20 | } |
21 | else { |
22 | $tester->run_tests(); |
23 | } |