CPAN::Groonga

 output '$@'"  if $@;

    return 1;
}

sub _load_table($self, $file) {

    my $json = $self->config_manager->load_json($file);
    my $template = $self->_load_templates(
        'Daje::Generate::Tem

   $table = Daje::Plugin::SQL::Manager->new(
            template => $template,
            json     => $json,
        );
    };
    die "process_sql failed '$@" if $@;

    return $table;
}

sub _loa

            source_path => $self->config->{PATH}->{sql_source_dir},
            filetype    => '*.json'
        );
        $config_manager->load_changed_files();
        $self->config_manager($config_

package Daje::Plugin::SQL::Base::Common;
use Mojo::Base -base, -signatures;

has 'json';
has 'template';
has 'sql';
has 'index';
has 'version';

our $VERSION = "0.01";

sub shift_section ($self, $arra

nfig->{PATH}->{sql_target_dir} . Mojo::File->new($self->file)->basename();
        $filename =~ s/json/sql/ig;
    };
    die "create_new_filename failed '$@'" if $@;

    return $filename;
}
1;

####

ate_fkey} = "";
    $self->templates->{template_ind} = "";
    eval {
        my $fields = $self->json->{fields};
        foreach my $key (sort keys %{$fields}) {
            if (index($key,'_fkey') >

aje::Plugin::Database::Operations;
use Daje::Tools::Filechanged;

use Mojo::File;
use Mojo::JSON qw{from_json};

has 'source_path';
has 'files';
has 'filetype' ;
has 'changed_files' ;
has 'change';

s

n 1;
}

sub load_json($self, $file) {
    my $context;
    eval {
        $context =  Mojo::File->new($file)->slurp;
    };
    die "load_json failed '$@" if $@;

    return from_json($context);
}

su

pod - keep this line to make pod updates possible ####################


=head1 REQUIRES

L<Mojo::JSON> 

L<Mojo::File> 

L<Daje::Tools::Filechanged> 

L<Daje::Plugin::Database::Operations> 

L<Daje::

N = "0.01";

sub create_fields($self){
    my $field = '';
    eval {
        my $fields = $self->json->{fields};
        foreach my $key (sort keys %{$fields}) {
            $field .= $key . ' ' . $f

y $sql = "";
    my $json = $self->json->{sql};
    my $length = scalar @{$json};
    for (my $i = 0; $i < $length; $i++) {
        my $type = $self->template->get_section(@{$json}[$i]->{type});
     

f->tablename()/ig;
                $template =~ s/<<fields>>/@{$json}[$i]->{fields}/ig;
                $template =~ s/<<values>>/@{$json}[$i]->{values}/ig;
            }
            default { $templa

ERSION = "0.01";

sub create_index($self) {
    my $sql = "";
    my $json = $self->json->{index};
    my $length = scalar @{$json};
    for (my $i = 0; $i < $length; $i++) {
        my $template = $s

s/<<type>>/@{$json}[$i]->{type}/ig;
        $template =~ s/<<fields>>/@{$json}[$i]->{fields}/ig;
        @{$json}[$i]->{fields} =~ s/,/_/ig;
        $template =~ s/<<field_names>>/@{$json}[$i]->{field

ons = "";
    my $json_arr = $self->json;
    my $length = scalar @{$json_arr};
    for (my $i = 0; $i < $length; $i++) {
        my $json = @{$json_arr}[$i];
        if (exists($json->{version})) {
 

           $sections .= $self->_version($json->{version});
        }
    }
    $self->set_sql($self->create_file($sections));
    return ;
}

sub _version($self, $version) {
    my $sql = "";
    my $

    return $template;

}

sub create_sql($self, $json, $tablename) {
    my $sql_stmt = Daje::Plugin::SQL::Script::Sql->new(
        json      => $json,
        template  => $self->template,
        t