use Test::More 'no_plan';

use Gi::Testing::TestDB;
my $testdb = Gi::Testing::TestDB->new(
    [qw/DBI:mysql:database:address:3306 tester password/],
    *main::DATA
);

$testdb->install;

# perform tests
$dbh = $testdb->dbh;

END {
    $testdb->uninstall;
}

__DATA__

CREATE TABLE TestObject (
    identifier INT(10) NOT NULL PRIMARY KEY,
    name       VARCHAR(50),
    attribute  VARCHAR(50)
);


##</code><code>##


use Gi::Testing::TestDB
    DataSource => [qw/DBI:mysql:database:address:3306 tester password/],
    Schema     => *main::DATA;


##</code><code>##


my $dbh = Gi::Testing::TestDB->dbh;


##</code><code>##

tell() on unopened filehandle DATA at C:/camelbox/site/lib/Gi/Installer/Database
/Schema.pm line 125.
readline() on unopened filehandle DATA at C:/camelbox/site/lib/Gi/Installer/Data
base/Schema.pm line 126.
seek() on unopened filehandle DATA at C:/camelbox/site/lib/Gi/Installer/Database
/Schema.pm line 127.
could not read any data from file handle - the file is empty or you are at the e
nd of the file  at C:/camelbox/site/lib/Gi/Installer/Database.pm line 20