| line |
true |
false |
branch |
|
175
|
0 |
0 |
unless $self->args
|
|
182
|
0 |
0 |
if (($traits_idx = &firstidx(sub {
|
|
194
|
0 |
0 |
if ($args[0] and $args[0] =~ /^create=(\S*)\z/)
|
|
198
|
0 |
0 |
if (@args)
|
|
206
|
0 |
0 |
if (&first(sub {
|
|
207
|
0 |
0 |
if $dbi_dsn_part ne "dbi"
|
|
232
|
0 |
0 |
if ($self->create eq 'dynamic') { }
|
|
|
0 |
0 |
elsif ($self->create eq 'static') { }
|
|
248
|
0 |
0 |
if $key =~ /^(?:components|constraint|exclude)\z/
|
|
251
|
0 |
0 |
if $@
|
|
264
|
0 |
0 |
if exists $loader_args{$re_opt}
|
|
269
|
0 |
0 |
$self->is_moose_schema ? :
|
|
|
0 |
0 |
!$self->old_schema ? :
|
|
|
0 |
0 |
@components ? :
|
|
|
0 |
0 |
%loader_args ? :
|
|
284
|
0 |
0 |
wantarray ? :
|
|
295
|
0 |
0 |
if ($self->_is_struct($val)) { }
|
|
|
0 |
0 |
elsif ((my @vals = split(/,/, $val, 0)) > 1) { }
|
|
307
|
0 |
0 |
if ($args->[0] =~ /sqlite/i) { }
|
|
308
|
0 |
0 |
if $args->[$i] eq ""
|
|
309
|
0 |
0 |
if $args->[$i] eq ""
|
|
320
|
0 |
0 |
if ($have_loader)
|
|
324
|
0 |
0 |
unless defined $args->[$i]
|
|
328
|
0 |
0 |
unless ("DBIx::Class::Schema::Loader::Base"->can($key))
|
|
333
|
0 |
0 |
if ($self->_is_struct($val)) { }
|
|
|
0 |
0 |
elsif ((my @vals = split(/,/, $val, 0)) > 1) { }
|
|
345
|
0 |
0 |
wantarray ? :
|
|
356
|
0 |
0 |
if (ref $val) { }
|
|
369
|
0 |
0 |
$self->old_schema && !$use_namespaces ? :
|
|
372
|
0 |
0 |
if ($components)
|
|
373
|
0 |
0 |
unless ref $components
|
|
377
|
0 |
0 |
wantarray ? :
|
|
396
|
0 |
0 |
if (/^\s*{.*}\s*\z/)
|
|
398
|
0 |
0 |
if $@
|
|
404
|
0 |
0 |
if (ref $val) { }
|
|
418
|
0 |
0 |
if ($key eq 'quote_char') { }
|
|
419
|
0 |
0 |
length $val == 1 ? :
|
|
433
|
0 |
0 |
$self->result_namespace eq '' ? :
|
|
446
|
0 |
0 |
unless -d $result_dir
|
|
454
|
0 |
0 |
unless $File::Find::name =~ /\.pm\z/
|
|
456
|
0 |
0 |
unless open my $fh, "<", $File::Find::name
|
|
462
|
0 |
0 |
unless $code =~ /\nuse Moose;\n/
|
|
480
|
0 |
0 |
unless (-f $schema_pm)
|
|
483
|
0 |
0 |
if $@
|
|
485
|
0 |
0 |
&try(sub {
|
|
488
|
0 |
0 |
unless open my $fh, "<", $schema_pm
|
|
494
|
0 |
0 |
if $result_namespace
|
|
496
|
0 |
0 |
if $code =~ /->load_classes/
|
|
519
|
0 |
0 |
if ($dsn =~ /sqlite/i) { }
|
|
540
|
0 |
0 |
if (/^\s*{.*}\s*\z/)
|
|
542
|
0 |
0 |
if $@
|
|
551
|
0 |
0 |
if ($key eq 'quote_char') { }
|
|
|
0 |
0 |
elsif ($key =~ /^(?:name_sep|limit_dialect)\z/) { }
|
|
552
|
0 |
0 |
length $val == 1 ? :
|
|
559
|
0 |
0 |
if $@
|
|
583
|
0 |
0 |
unless $self->_is_struct($val)
|
|
591
|
0 |
0 |
if &looks_like_number($code)
|
|
593
|
0 |
0 |
unless $self->_is_struct($code)
|
|
620
|
0 |
0 |
unless $self->connect_info
|
|
650
|
0 |
0 |
if (not @sources)
|
|
672
|
0 |
0 |
if $response =~ /^n(o)?\z/
|