Branch Coverage

blib/lib/Data/Object/Role/Constructor.pm

Criterion	Covered	Total	%
branch	3	4	75.0

line	true	false	branch
16	0	2	if (blessed $data and $data->isa('Regexp') and $^V <= v5.12.0)
20	5	5	ref $data ? :