Commit | Line | Data |
---|---|---|
53de57ed | 1 | package DBICDHTest; |
2 | ||
3 | use strict; | |
4 | use warnings; | |
5 | ||
6 | use File::Path 'remove_tree'; | |
7 | use Test::More; | |
8 | use Test::Exception; | |
9 | ||
10 | sub ready { | |
53de57ed | 11 | if (-d 't/sql') { |
12 | remove_tree('t/sql'); | |
13 | mkdir 't/sql'; | |
14 | } | |
15 | } | |
16 | ||
f3b5161e | 17 | sub dbh { |
18 | DBI->connect('dbi:SQLite::memory:', undef, undef, { RaiseError => 1 }) | |
19 | } | |
20 | ||
53de57ed | 21 | 1; |