onents(
"InflateColumn::DateTime",
"InflateColumn::Serializer",
"InflateColumn::Serializer::JSON",
);
__PACKAGE__->table("events");
__PACKAGE__->add_columns(
"event_uuid",
{ data_type => "bi
type => "tinyint", is_nullable => 0 },
"facets",
{ data_type => "json", is_nullable => 1 },
"rendered",
{ data_type => "json", is_nullable => 1 },
);
__PACKAGE__->set_primary_key("event_id");
onents(
"InflateColumn::DateTime",
"InflateColumn::Serializer",
"InflateColumn::Serializer::JSON",
);
__PACKAGE__->table("test_files");
__PACKAGE__->add_columns(
"test_file_id",
{ data_type
onents(
"InflateColumn::DateTime",
"InflateColumn::Serializer",
"InflateColumn::Serializer::JSON",
);
__PACKAGE__->table("session_hosts");
__PACKAGE__->add_columns(
"session_host_id",
{ data
inflate => DBIx::Class::InflateColumn::Serializer::JSON->get_unfreezer('data', {}),
deflate => DBIx::Class::InflateColumn::Serializer::JSON->get_freezer('data', {}),
},
);
1;
__END__
=
nflate => DBIx::Class::InflateColumn::Serializer::JSON->get_unfreezer('metadata', {}),
deflate => DBIx::Class::InflateColumn::Serializer::JSON->get_freezer('metadata', {}),
},
);
sub huma
:InflateColumn::Serializer::JSON->get_unfreezer('data', {}),
deflate => DBIx::Class::InflateColumn::Serializer::JSON->get_freezer('data', {}),
},
);
sub TO_JSON {
my $self = shift;
my %cols = $self->get_all_fields;
$cols{data} = decode_json($cols{data}) if $cols{data} && !ref($cols{data});
return \%cols;
}
1;
__END__
=pod
=encoding UTF-8
=head1 NAME
App::Yath::Sc
elect' => ['data IS NOT NULL AS has_data'],
'+as' => ['has_data'],
})->all;
}
sub TO_JSON {
my $self = shift;
my %cols = $self->get_all_fields;
$cols{user} //= $self->user
sig } sort { $a->job_try_ord <=> $b->job_try_ord } $self->jobs_tries;
$out //= ';';
}
sub TO_JSON {
my $self = shift;
my %cols = $self->get_all_fields;
$cols{short_file} = $self->
::Schema::Result::RunField;
use utf8;
use strict;
use warnings;
use Test2::Harness::Util::JSON qw/decode_json/;
use Carp qw/confess/;
confess "You must first load a App::Yath::Schema::NAME module"
:InflateColumn::Serializer::JSON->get_unfreezer('data', {}),
deflate => DBIx::Class::InflateColumn::Serializer::JSON->get_freezer('data', {}),
},
);
sub TO_JSON {
my $self = shift;
my %cols = $self->get_all_fields;
$cols{data} = decode_json($cols{data}) if $cols{data} && !ref($cols{data});
return \%cols;
}
1;
__END__
=pod
=encoding UTF-8
=head1 NAME
App::Yath::Sch
onents(
"InflateColumn::DateTime",
"InflateColumn::Serializer",
"InflateColumn::Serializer::JSON",
);
__PACKAGE__->table("events");
__PACKAGE__->add_columns(
"event_uuid",
{ data_type => "uu
ype => "boolean", is_nullable => 0 },
"facets",
{ data_type => "jsonb", is_nullable => 1 },
"rendered",
{ data_type => "jsonb", is_nullable => 1 },
);
__PACKAGE__->set_primary_key("event_id");
onents(
"InflateColumn::DateTime",
"InflateColumn::Serializer",
"InflateColumn::Serializer::JSON",
);
__PACKAGE__->table("test_files");
__PACKAGE__->add_columns(
"test_file_id",
{ data_type
nflate => DBIx::Class::InflateColumn::Serializer::JSON->get_unfreezer('rendered', {}),
deflate => DBIx::Class::InflateColumn::Serializer::JSON->get_freezer('rendered', {}),
},
);
__PACKAG
inflate => DBIx::Class::InflateColumn::Serializer::JSON->get_unfreezer('facets', {}),
deflate => DBIx::Class::InflateColumn::Serializer::JSON->get_freezer('facets', {}),
},
);
sub run {
= shift;
return App::Yath::Schema::ImportModes::event_in_mode(event => $self, @_);
}
sub TO_JSON {
my $self = shift;
my %cols = $self->get_all_fields;
return \%cols;
}
sub st_line_d
flate => DBIx::Class::InflateColumn::Serializer::JSON->get_unfreezer('parameters', {}),
deflate => DBIx::Class::InflateColumn::Serializer::JSON->get_freezer('parameters', {}),
},
);
sub n
onents(
"InflateColumn::DateTime",
"InflateColumn::Serializer",
"InflateColumn::Serializer::JSON",
);
__PACKAGE__->table("sweeps");
__PACKAGE__->add_columns(
"sweep_id",
{
data_type
onents(
"InflateColumn::DateTime",
"InflateColumn::Serializer",
"InflateColumn::Serializer::JSON",
);
__PACKAGE__->table("session_hosts");
__PACKAGE__->add_columns(
"session_host_id",
{
onents(
"InflateColumn::DateTime",
"InflateColumn::Serializer",
"InflateColumn::Serializer::JSON",
);
__PACKAGE__->table("permissions");
__PACKAGE__->add_columns(
"permission_id",
{ data_typ
.010;
use strict;
use warnings;
use Carp qw( croak carp );
use Cwd 'getcwd';
use FindBin ();
use JSON::XS ();
use LWP::UserAgent ();
use POSIX ();
use URI ();
use YAML::XS ();
our $VERSION = '1.19';
de_fh> );
}
}
}
}
{
my $json_xs;
sub _parse_config {
my ($input) = @_;
my @types = qw( yaml json );
if ( $input->{include} =~ /\.yaml$/i or $
);
}
elsif ( $input->{include} =~ /\.json$/i or $input->{include} =~ /\.js$/i ) {
@types = ( 'json', grep { $_ ne 'json' } @types );
}
my ( $config, @error
ot::IRC persistent data storage with SQLite
use 5.014;
use exact;
use DBI;
use DBD::SQLite;
use JSON::XS;
our $VERSION = '1.42'; # VERSION
sub init {
my ($bot) = @_;
my $obj = __PACKAGE__-
key TEXT,
value TEXT
)
}) unless ($pre_exists);
$self->{json} = JSON::XS->new->ascii;
return $self;
}
sub get {
my ( $self, $key ) = @_;
my $namespa
tore::SQLite issue); key = $key; error = $e\n";
}
if ($value) {
$value = $self->{json}->decode($value) || undef;
$value = $value->{value} if ( ref $value eq 'HASH' and exists
ttp://www.cpantesters.org/distro/D/Daemon-Device.html>
=back
=for Pod::Coverage BUILD is_authed json passwd ua user data
=head1 AUTHOR
Gryphon Shafer <gryphon@cpan.org>
=head1 COPYRIGHT AND LICEN
onents(
"InflateColumn::DateTime",
"InflateColumn::Serializer",
"InflateColumn::Serializer::JSON",
);
__PACKAGE__->table("reporting");
__PACKAGE__->add_columns(
"reporting_id",
{
data_ty