Branch Coverage

lib/CodeGen/Protection/Role.pm
Criterion Covered Total %
branch 14 20 70.0


line true false branch
67 17 4 if ($self->has_existing_code) { }
73 0 4 if (not $self->has_existing_code and $protected_code =~ /$regex/)
93 6 11 if ($replacement =~ /$extract_re/s)
113 1 16 unless ($text =~ /$extract_re/s)
121 1 15 unless ($digest_start eq $digest_end)
127 1 14 if (not $self->overwrite and $digest_start ne $self->_get_checksum($+{'body'}))
146 0 6 unless ($text =~ /$extract_re/)
153 0 6 unless ($digest_start eq $digest_end)
249 42 0 if (defined $version and $version =~ /$version_re/)
253 0 0 if (not defined $version) { }