8 use SQL::Translator::Schema::Constants;
9 use Test::SQL::Translator qw(maybe_plan);
12 maybe_plan(3, "SQL::Translator");
16 my $tr = SQL::Translator->new(
17 parser => "PostgreSQL",
20 ok( $tr->translate('t/data/pgsql/wiki.sql'), 'Translate PG' );
21 ok( my $schema = $tr->schema, 'Got Schema' );
22 ok( my $graph = $schema->as_graph, 'Graph made');