| line |
true |
false |
branch |
|
124
|
2 |
18 |
unless (defined $name) |
|
131
|
0 |
20 |
do {
$bucket->{'_names'}{$name} if exists $bucket->{'_names'}{$name}
} ? : |
|
|
0 |
20 |
do {
exists $bucket->{'_names'}{$name} if $unique
} ? : |
|
|
20 |
0 |
ref $sub eq ref sub {
}
? : |
|
136
|
0 |
20 |
if $unique |
|
140
|
10 |
10 |
if exists $bucket->{'_names'}{$name} |
|
155
|
20 |
0 |
if (defined $name) { } |
|
|
0 |
0 |
elsif (defined $entry->get_name) { } |
|
|
0 |
0 |
elsif (($name) = map({$_->{'sub'} =~ /^__|add_to_bucket/ ? () : $_->{'sub'};} @caller)) { } |
|
157
|
0 |
0 |
if ($_->{'sub'} =~ /^__|add_to_bucket/) { } |
|
175
|
14 |
92 |
if ($_->{'sub'} =~ /add_to_bucket/) { } |
|
196
|
24 |
0 |
exists $bucket->{$sub} ? : |
|
220
|
0 |
0 |
unless $brick->get_name eq $name |
|
225
|
0 |
0 |
wantarray ? : |
|
295
|
0 |
1 |
unless UNIVERSAL::isa($_[1], ref {}) |
|
326
|
38 |
248 |
unless @caller |
|
382
|
0 |
0 |
unless $_[0]{'gv'} |
|
429
|
0 |
0 |
ref $_[0]{'created_by'} ? : |