| line |
true |
false |
branch |
|
23
|
1 |
0 |
unless @args |
|
30
|
0 |
2 |
if defined &DB::DB and not $Devel::DProf::VERSION |
|
72
|
3 |
1 |
unless @args |
|
78
|
3 |
1 |
unless (UNIVERSAL::isa($target_class, 'Class::Accessor::Constructor::Base')) |
|
90
|
0 |
5 |
if defined &DB::DB |
|
97
|
0 |
5 |
if (ref $class) { } |
|
101
|
1 |
4 |
if $should_dirty |
|
104
|
1 |
4 |
if ($should_dirty) |
|
130
|
4 |
1 |
unless (exists $cache{'MUNGE_CONSTRUCTOR_ARGS'}{ref $self}) |
|
135
|
0 |
5 |
if ($munger) { } |
|
140
|
0 |
5 |
scalar(@_ == 1) && ref $_[0] eq 'HASH' ? : |
|
157
|
0 |
5 |
if $seen{$_}++ |
|
159
|
4 |
1 |
unless (exists $cache{'setter'}{$_}{ref $self}) |
|
163
|
0 |
5 |
unless ($setter) |
|
172
|
4 |
1 |
unless (exists $cache{'INIT'}{ref $self}) |
|
176
|
3 |
2 |
if $init |