Yet Another CPAN Grep

Daje-Plugin-GenerateSchema ( J/JA/JANESKIL/Tools/Daje-Plugin-GenerateSchema-0.01.tar.gz, JANESKIL, 2024; MetaCPAN )

Daje-Plugin-GenerateSchema/lib/Daje/Plugin/GenerateSchema.pm ( view source; MetaCPAN )

jo::JSON qw{to_json};
use Daje::Plugin::Schema::Create;
use Mojo::Pg;

sub process ($self) {
    $self->_load_config();
    my $schema = $self->_load_db_schema();
    my $json = $self->_build_json($sc

hema);
    $self->_save_json($json);

    return 1;
}

sub _load_db_schema($self) {
    my $connection = $self->config->{DATABASE}->{connection};
    my $pg = Mojo::Pg->new->dsn($connection);

    my

'public');

    return $dbschema;
}

sub _build_json($self, $schema) {
    my $json = to_json($schema);

    return $json;
}

sub _save_json($self, $json) {

    my $path = $self->config->{DATABASE}->