Commit | Line | Data |
---|---|---|
0009fa49 | 1 | #!/usr/bin/perl |
2 | ||
3 | use strict; | |
4 | use warnings; | |
5 | use lib qw(lib t/lib); | |
6 | ||
1c339d71 | 7 | use DBICTest; |
38e48163 | 8 | use DBICTest::Schema::HelperRels; |
0009fa49 | 9 | |
1c339d71 | 10 | my $schema = DBICTest->initialise; |
0009fa49 | 11 | |
1c339d71 | 12 | print $schema->storage->deployment_statements($schema); |