App-DBCritic
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
t/policy/bidirectional_relationship.t view on Meta::CPAN
#!/usr/bin/env perl
use Modern::Perl '2011'; ## no critic (Modules::ProhibitUseQuotedVersion)
use Test::Most tests => 1;
use English '-no_match_vars';
use Path::Class;
use FindBin;
use local::lib dir( $FindBin::Bin, 'bidirectional_relationship' )
->stringify();
use DBICx::TestDatabase;
use App::DBCritic;
my $schema = DBICx::TestDatabase->new('MySchema');
my $critic = App::DBCritic->new( schema => $schema );
cmp_bag( [ map { $_->element->name } @{ $critic->violations } ],
['one_way'] );
view all matches for this distributionview release on metacpan - search on metacpan
( run in 2.101 seconds using v1.00-cache-2.02-grep-82fe00e-cpan-f5108d614456 )