Commit | Line | Data |
a78e3fed |
1 | use strict; |
2 | use lib qw( . ./t ); |
fbd83464 |
3 | use dbixcsl_common_tests; |
a78e3fed |
4 | |
5 | my $database = $ENV{DB2_NAME} || ''; |
6 | my $user = $ENV{DB2_USER} || ''; |
7 | my $password = $ENV{DB2_PASS} || ''; |
8 | |
fbd83464 |
9 | my $tester = dbixcsl_common_tests->new( |
af96f52e |
10 | vendor => 'DB2', |
11 | auto_inc_pk => 'INTEGER GENERATED BY DEFAULT AS IDENTITY NOT NULL PRIMARY KEY', |
12 | dsn => "dbi:DB2:$database", |
13 | user => $user, |
14 | password => $password, |
15 | db_schema => $user, |
16 | drop_db_schema => 1, |
a78e3fed |
17 | ); |
18 | |
19 | if( !$database || !$user ) { |
20 | $tester->skip_tests('You need to set the DB2_NAME, DB2_USER and DB2_PASS environment variables'); |
21 | } |
22 | else { |
23 | $tester->run_tests(); |
24 | } |