view release on metacpan or  search on metacpan

lib/Test/Database/Migrator.pm  view on Meta::CPAN

}

exit(main() ? 0 : 1);
EOF

    $self->_write_ddl_file(
        $file,
        $migration,
    );

    chmod 0755, $file->stringify;

    return;
}

sub _new_migrator {
    my $self = shift;

    return $self->class()->new(
        database        => $self->database(),
        migration_table => 'applied_migration',