| line |
true |
false |
branch |
|
50
|
20 |
1 |
if (my($part) = $class =~ /(?:::Schema)?::Result::(.+)$/) { } |
|
71
|
2 |
19 |
if ($version eq 'singular') { } |
|
|
19 |
0 |
elsif ($version == 1) { } |
|
104
|
15 |
4 |
if (my $v = $self->autotable($args->{'autotable'})) |
|
107
|
15 |
60 |
unless $ran++ |
|
138
|
0 |
465 |
if (my $a = $DBIx::Class::Candy::Exports::aliases{$_}) |
|
141
|
0 |
465 |
if (my $m = $DBIx::Class::Candy::Exports::methods{$_}) |
|
163
|
0 |
26 |
unless defined $val |
|
164
|
13 |
13 |
if ($skipnext) |
|
169
|
10 |
3 |
if ($val eq '-base') { } |
|
|
3 |
0 |
elsif ($val eq '-autotable') { } |
|
|
0 |
0 |
elsif ($val eq '-perl5') { } |
|
|
0 |
0 |
elsif ($val eq '-experimental') { } |
|
|
0 |
0 |
elsif ($val eq '-components') { } |
|
174
|
3 |
0 |
if length $autotable == 1 |
|
296
|
12 |
7 |
if ($perl_version) |
|
301
|
9 |
10 |
if ($experimental) |
|
303
|
0 |
9 |
unless ref $experimental and ref $experimental eq 'ARRAY' |