line |
true |
false |
branch |
50
|
4 |
0 |
if ($version == 1) |
51
|
3 |
1 |
if (my($part) = $class =~ /(?:::Schema)?::Result::(.+)$/) { } |
83
|
0 |
0 |
if (my $v = $self->autotable($$args{'autotable'})) |
86
|
0 |
0 |
unless $ran++ |
117
|
0 |
0 |
if (my $a = $DBIx::Class::Candy::Exports::aliases{$_}) |
120
|
0 |
0 |
if (my $m = $DBIx::Class::Candy::Exports::methods{$_}) |
140
|
0 |
4 |
unless defined $val |
141
|
2 |
2 |
if ($skipnext) |
146
|
1 |
1 |
if ($val eq '-base') { } |
|
1 |
0 |
elsif ($val eq '-autotable') { } |
|
0 |
0 |
elsif ($val eq '-perl5') { } |
|
0 |
0 |
elsif ($val eq '-components') { } |
265
|
0 |
0 |
if ($perl_version) |