DBIx-Class-TemporalRelations

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

            "Dist::Zilla::Plugin::TestRelease" : "0",
            "Dist::Zilla::Plugin::UploadToCPAN" : "0"
         }
      },
      "runtime" : {
         "requires" : {
            "Carp" : "0",
            "DBIx::Class::Candy::Exports" : "0",
            "DBIx::Class::Relationship::Base" : "0",
            "Lingua::EN::Inflexion" : "0",
            "Modern::Perl" : "0",
            "Sub::Quote" : "0",
            "parent" : "0",
            "perl" : "5.010"
         }
      },
      "test" : {
         "recommends" : {
            "CPAN::Meta" : "2.120900"
         },
         "requires" : {

lib/DBIx/Class/TemporalRelations.pm  view on Meta::CPAN

package DBIx::Class::TemporalRelations;
use Modern::Perl;
our $VERSION = '0.9000'; # VERSION
our $AUTHORITY = 'cpan:GEEKRUTH'; # AUTHORITY
# ABSTRACT: Establish and introspect time-based relationships between tables.
use Carp qw(carp croak);

use parent 'DBIx::Class::Relationship::Base';
use DBIx::Class::Candy::Exports;
use Lingua::EN::Inflexion;
use Sub::Quote qw(quote_sub);

perlcriticrc  view on Meta::CPAN

[Subroutines::ProhibitExcessComplexity]
max_mccabe = 25

[TestingAndDebugging::ProhibitNoStrict]
allow = refs

[TestingAndDebugging::ProhibitNoWarnings]
allow = redefine

[TestingAndDebugging::RequireUseStrict]
equivalent_modules = Modern::Perl

[TestingAndDebugging::RequireUseWarnings]
equivalent_modules = Modern::Perl

[ValuesAndExpressions::ProhibitInterpolationOfLiterals]
allow_if_string_contains_single_quote = 1

[Variables::ProhibitPackageVars]
add_packages = Carp Test::Builder

#
# Turn these off!
#

t/00-report-prereqs.dd  view on Meta::CPAN

                                      'Dist::Zilla::Plugin::TestRelease' => '0',
                                      'Dist::Zilla::Plugin::UploadToCPAN' => '0'
                                    }
                    },
       'runtime' => {
                      'requires' => {
                                      'Carp' => '0',
                                      'DBIx::Class::Candy::Exports' => '0',
                                      'DBIx::Class::Relationship::Base' => '0',
                                      'Lingua::EN::Inflexion' => '0',
                                      'Modern::Perl' => '0',
                                      'Sub::Quote' => '0',
                                      'parent' => '0',
                                      'perl' => '5.010'
                                    }
                    },
       'test' => {
                   'recommends' => {
                                     'CPAN::Meta' => '2.120900'
                                   },
                   'requires' => {

t/lib/TestSchema.pm  view on Meta::CPAN

package TestSchema;
use Modern::Perl;
use base qw(DBIx::Class::Schema);

__PACKAGE__->load_namespaces();

1;

t/lib/TestSchema/Result/Contraption.pm  view on Meta::CPAN

package TestSchema::Result::Contraption;
use Modern::Perl;
use base qw(DBIx::Class::Core);

__PACKAGE__->table('teddy_bear');
__PACKAGE__->add_columns(qw(id purchased_by purchase_dt color height where_purchased));
__PACKAGE__->set_primary_key('id');

__PACKAGE__->belongs_to( 'purchased_by' => 'TestSchema::Result::Human', 'id' );

1;

t/lib/TestSchema/Result/Doodad.pm  view on Meta::CPAN

package TestSchema::Result::Doodad;
use Modern::Perl;
use parent qw(DBIx::Class::Core);

__PACKAGE__->table('doodad');
__PACKAGE__->add_columns(qw/id description created_dt created_by/);
__PACKAGE__->add_columns(
  modified_dt => { is_nullable => 1, },
  modified_by => { is_nullable => 1, },
);
__PACKAGE__->set_primary_key('id');
__PACKAGE__->belongs_to( 'created_by'  => 'TestSchema::Result::Human', 'id' );

t/lib/TestSchema/Result/Doohickey.pm  view on Meta::CPAN

package TestSchema::Result::Doohickey;
use Modern::Perl;
use base qw(DBIx::Class::Core);

__PACKAGE__->table('doohickey');
__PACKAGE__->add_columns(qw/id model make purchased_by purchase_dt/);
__PACKAGE__->add_columns(
  modified_dt => { is_nullable => 1, },
  modified_by => { is_nullable => 1, },
);
__PACKAGE__->set_primary_key('id');
__PACKAGE__->belongs_to( 'purchased_by' => 'TestSchema::Result::Human', 'id' );

t/lib/TestSchema/Result/Human.pm  view on Meta::CPAN

package TestSchema::Result::Human;
use Modern::Perl;

use DBIx::Class::Candy -components => [qw/TemporalRelations/];

__PACKAGE__->table('human');
__PACKAGE__->add_columns(qw(id name));
__PACKAGE__->set_primary_key('id');

__PACKAGE__->has_many(
    'contraptions' => 'TestSchema::Result::Contraption',
    'purchased_by'

 view all matches for this distribution
 view release on metacpan -  search on metacpan