Branch Coverage

blib/lib/Venus/Assert.pm
Criterion Covered Total %
branch 67 84 79.7


line true false branch
46 0 179 unless $name
58 2 436 if @args
86 2 64 if @args
104 2 204 if @args
122 0 102 unless $data
127 18 84 unless $self->name
134 13 89 ref $parsed->[0] eq 'ARRAY' ? :
102 0 @{$parsed;} > 0 ? :
168 307 228 wantarray ? :
187 9 20 unless (defined $data)
194 12 8 unless ($blessed or ref $data)
197 0 8 if ($blessed and ref $data eq "Regexp")
200 0 8 if ($isvenus and $data->does("Venus::Role::Explainable"))
203 0 8 if ($isvenus and $data->does("Venus::Role::Valuable"))
206 0 8 if ($isvenus and $data->does("Venus::Role::Dumpable"))
209 0 8 if ($blessed and overload::Method($data, "\"\""))
212 0 8 if ($blessed and $data->can("as_string"))
215 0 8 if ($blessed and $data->can("to_string"))
218 0 8 if ($blessed and $data->isa('Venus::Kind')) { }
249 104 29 if $valid
255 0 20 $received eq '' ? :
20 9 defined $data ? :
296 55 88 $either ? :
246 143 wantarray && !$either ? :
317 401 66 unless $expr =~ _type_regexp(_type_subexpr_type_2())
325 1 260 $_ =~ qr/^@{[_type_subexpr_type_2()];},.*$/u ? :
334 61 5 @items > 1 ? :
343 3 457 if (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_2(), _type_subexpr_type_2()))) { }
4 453 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_1(), _type_subexpr_type_2()))) { }
3 450 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_2(), _type_subexpr_type_1()))) { }
49 401 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_2()))) { }
4 397 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_3(), _type_subexpr_type_2()))) { }
3 394 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_2(), _type_subexpr_type_3()))) { }
61 333 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_4(), _type_subexpr_type_3()))) { }
0 333 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_3(), _type_subexpr_type_4()))) { }
0 333 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_1(), _type_subexpr_type_3()))) { }
0 333 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_3(), _type_subexpr_type_1()))) { }
0 333 elsif (_type_regexp_eval($expr, _type_regexp(_type_subexpr_type_3(), _type_subexpr_type_3()))) { }
469 3 24 scalar _type_regexp_eval($_, _type_regexp(_type_subexpr_type_2(), _type_subexpr_type_2())) ? :
494 33 44 if (ref $data eq "HASH")
500 1 76 if (ref $data eq "ARRAY")
501 2 0 /^\w+$/u ? :