Branch Coverage

blib/lib/Data/Censor.pm
Criterion Covered Total %
branch 13 22 59.0


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') ? :