line |
true |
false |
branch |
88
|
0 |
2 |
if (ref $args{'sensitive_fields'} eq 'Regexp') { } |
|
0 |
2 |
elsif (ref $args{'sensitive_fields'} eq 'ARRAY') { } |
103
|
1 |
1 |
if (ref $args{'replacement_callbacks'} eq 'HASH') |
106
|
0 |
2 |
if (exists $args{'replacement'}) { } |
132
|
0 |
4 |
if ($recurse_count++ > $$self{'recurse_limit'}) |
137
|
0 |
4 |
if (ref $data ne 'HASH') |
143
|
2 |
12 |
if (ref $$data{$key} eq 'HASH') { } |
|
6 |
12 |
elsif ($$self{'is_sensitive_field'} and $$self{'is_sensitive_field'}{lc $key} or $$self{'censor_regex'} and $key =~ /$$self{'censor_regex'}/) { } |
151
|
1 |
5 |
if ($$self{'replacement_callbacks'}{lc $key}) { } |
187
|
0 |
0 |
unless eval {
do {
require Clone;
1
}
} |
195
|
0 |
0 |
ref $class && $class->isa('Data::Censor') ? : |