| line |
true |
false |
branch |
|
26
|
32 |
0 |
if ($ok) { }
|
|
56
|
0 |
5 |
if (my $global_search = $arg->{'search'})
|
|
57
|
0 |
0 |
ref $global_search eq 'ARRAY' ? :
|
|
61
|
0 |
5 |
if (my $global_cb = $arg->{'exec'})
|
|
65
|
4 |
1 |
if ($search)
|
|
66
|
2 |
2 |
ref $search eq 'ARRAY' ? :
|
|
75
|
0 |
10 |
defined $arg->{'isa_class'} ? :
|
|
85
|
0 |
10 |
defined $arg->{'isa_class'} ? :
|
|
96
|
1 |
0 |
defined $message ? :
|
|
97
|
1 |
0 |
if (ref $result1 eq ref $result2) { }
|
|
111
|
1 |
2 |
defined $message ? :
|
|
112
|
3 |
0 |
if (ref $rs1 eq ref $rs2) { }
|
|
139
|
11 |
2 |
defined $message ? :
|
|
141
|
1 |
12 |
if ($arg and ref $arg and ref $arg eq 'CODE') { }
|
|
|
7 |
5 |
elsif ($arg and ref $arg and ref $arg eq 'HASH' || ref $arg eq 'ARRAY') { }
|
|
|
5 |
0 |
elsif ($arg) { }
|
|
144
|
0 |
1 |
if ($@) { }
|
|
155
|
0 |
7 |
if ($@) { }
|
|
163
|
0 |
5 |
ref $arg ? :
|
|
169
|
0 |
5 |
if ($@) { }
|
|
185
|
0 |
10 |
if (defined $arg and ref $arg eq 'HASH' and defined $arg->{'fields'})
|
|
186
|
0 |
0 |
ref $arg->{'fields'} ? :
|
|
191
|
27 |
1 |
if (not ref $args[0] or ref $args[0] eq 'ARRAY')
|
|
193
|
24 |
3 |
ref $fields ? :
|
|
195
|
7 |
21 |
if (&Scalar::Util::blessed($args[0]) and $args[0]->isa('DBIx::Class') and not $args[0]->isa('DBIx::Class::ResultSet')) { }
|
|
|
21 |
0 |
elsif (&Scalar::Util::blessed($args[0]) and $args[0]->isa('DBIx::Class::ResultSet')) { }
|
|
200
|
1 |
6 |
unless (@fields)
|
|
208
|
2 |
5 |
if (ref $compare eq 'HASH') { }
|
|
|
3 |
2 |
elsif (ref $compare eq 'ARRAY') { }
|
|
|
2 |
0 |
elsif (not ref $compare) { }
|
|
215
|
0 |
3 |
if @localfields
|
|
222
|
0 |
2 |
if @localfields
|
|
226
|
0 |
12 |
unless $result->can($_)
|
|
234
|
0 |
21 |
unless (@fields)
|
|
243
|
7 |
51 |
if (not ref $_) { }
|
|
|
48 |
3 |
elsif (ref $_ eq 'ARRAY') { }
|
|
249
|
0 |
7 |
if @localfields
|
|
256
|
0 |
48 |
if @localfields
|
|
304
|
2 |
16 |
if (my $search = $arg->{'search'})
|
|
305
|
0 |
2 |
ref $search eq 'ARRAY' ? :
|
|
310
|
4 |
50 |
if ($search)
|
|
312
|
2 |
2 |
if (ref $search and ref $search eq 'HASH') { }
|
|
342
|
1 |
9 |
if (my $resultsets = delete $merged_config->{'resultsets'})
|
|
343
|
1 |
0 |
if (ref $resultsets eq 'ARRAY') { }
|
|
363
|
6 |
266 |
unless $_
|
|
374
|
0 |
1 |
if (not defined $ENV{$v}) { }
|
|
385
|
1 |
0 |
$2 ? :
|
|
393
|
7 |
6 |
if (ref $opts[0])
|
|
394
|
7 |
0 |
if (ref $opts[0] eq 'HASH') { }
|
|
402
|
3 |
11 |
if ($opt =~ /^-(.+)/) { }
|
|
403
|
0 |
3 |
if ($config->{$1}) { }
|
|
414
|
1 |
12 |
if (my $resultsets = delete $config->{'resultsets'})
|
|
415
|
1 |
0 |
if (ref $resultsets eq 'ARRAY') { }
|
|
422
|
0 |
28 |
ref $_ && ref $_ eq 'ARRAY' ? :
|
|
431
|
2 |
9 |
if (my $fixture_path = delete $config->{'fixture_path'}) { }
|
|
456
|
4 |
12 |
ref $fixture eq 'HASH' ? :
|
|
459
|
2 |
14 |
if ($merged_fixtures{$file}) { }
|
|
468
|
2 |
9 |
if (my $old_fixture_sets = delete $config->{'fixture_sets'}) { }
|
|
471
|
2 |
0 |
ref $old_fixture_sets->{$_} eq 'HASH' ? :
|
|
486
|
16 |
80 |
if ($file =~ /\.$extension$/)
|
|
496
|
3 |
9 |
if (my $extra_config = delete $config->{'config_path'}) { }
|
|
508
|
2 |
10 |
if (my $post_config = delete $config->{'config_path'})
|
|
515
|
10 |
10 |
$ENV{'TEST_DBIC_CONFIG_SUFFIX'} ? :
|
|
519
|
2 |
0 |
ref $_ ? :
|
|
558
|
60 |
290 |
$ENV{'TEST_DBIC_CONFIG_SUFFIX'} ? :
|
|
573
|
0 |
11 |
if (not ref $extra_paths) { }
|
|
|
11 |
0 |
elsif (ref $extra_paths eq 'ARRAY') { }
|
|
576
|
4 |
7 |
if (not ref $extra_paths->[0]) { }
|
|
|
7 |
0 |
elsif (ref $extra_paths->[0] eq 'ARRAY') { }
|
|
588
|
9 |
18 |
if (defined $extra_paths) { }
|
|
589
|
7 |
16 |
"$_" eq '+' ? :
|
|
590
|
21 |
2 |
ref $_ ? :
|
|
623
|
0 |
14 |
if ($script_path->basename eq 'schema' and scalar @dir_parts == 0) { }
|
|
651
|
0 |
20 |
if ($@ or not $schema_manager)
|
|
653
|
0 |
0 |
if $@
|
|
658
|
0 |
0 |
if ($fail_on_schema_break) { }
|