mirror of
https://github.com/DBD-SQLite/DBD-SQLite
synced 2025-06-07 14:19:10 -04:00
Wrap the initial database code in a scope
This commit is contained in:
parent
a95211acc0
commit
2bed12654d
1 changed files with 6 additions and 4 deletions
|
@ -18,10 +18,12 @@ my $drop1 = 'DROP TABLE table1';
|
|||
my $drop2 = 'DROP TABLE table2';
|
||||
|
||||
# diag("Parent connecting... ($$)\n");
|
||||
my $dbh = connect_ok();
|
||||
ok( $dbh->do($create1), $create1 );
|
||||
ok( $dbh->do($create2), $create2 );
|
||||
ok( $dbh->disconnect, '->disconnect ok' );
|
||||
SCOPE: {
|
||||
my $dbh = connect_ok();
|
||||
ok( $dbh->do($create1), $create1 );
|
||||
ok( $dbh->do($create2), $create2 );
|
||||
ok( $dbh->disconnect, '->disconnect ok' );
|
||||
}
|
||||
|
||||
my $pid;
|
||||
# diag("Forking... ($$)");
|
||||
|
|
Loading…
Add table
Reference in a new issue