| line |
true |
false |
branch |
|
35
|
6 |
0 |
$HOOKS{$_[-1]} ? :
|
|
50
|
0 |
0 |
unless $from = $from->{$arg}
|
|
61
|
0 |
87 |
unless $tref and $tref eq "SCALAR"
|
|
66
|
82 |
5 |
unless ($new_type)
|
|
67
|
82 |
0 |
if (my $aff = $col->{'affinity'})
|
|
68
|
17 |
65 |
if (my $list = $self->{'affinities'}{$aff})
|
|
70
|
1 |
16 |
if $new_type = &$cb(%$col)
|
|
76
|
81 |
6 |
unless $new_type
|
|
86
|
3 |
7 |
unless (load_class($row_class))
|
|
88
|
0 |
3 |
unless $@ =~ /Can't locate.*in \@INC/
|
|
98
|
0 |
30 |
unless $accessor
|
|
101
|
15 |
15 |
if defined &{"${row_class}::$accessor";}
|
|
109
|
4 |
12 |
unless ($aliases and @$aliases)
|
|
110
|
2 |
2 |
$link->unique ? :
|
|
115
|
0 |
16 |
unless $accessor
|
|
117
|
8 |
8 |
if defined &{"${row_class}::$accessor";}
|
|
118
|
4 |
4 |
$link->unique ? :
|