blib/lib/HTML/Blitz.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 36 | 54 | 66.6 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
53 | 17 | 225 | 6 | @rules and ref $rules[0] eq "HASH" |
151 | 0 | 592 | 0 | @_ > 1 and (@_ - 1) % 2 |
152 | 307 | 129 | 156 | $allow_tag_name and $$src_ref =~ /\G(\*|$ident)/cgu |
183 | 27 | 3 | 1 | $op eq "~" and $value eq '' || $value =~ /$ws/u |
8 | 19 | 3 | $op =~ /\A[\^\$*]\z/u and $value eq "" | |
334 | 0 | 0 | 0 | &blessed($val) and overload::Method($val, "&{}") |
339 | 0 | 0 | 6 | &blessed($val) and $val->isa("HTML::Blitz::Template") |
696 | 0 | 0 | 0 | $type eq 'seperator' && $custom_action->{'separator'} |
700 | 245 | 5 | 0 | @_ > 1 and (@_ - 1) % 2 |
line | l | !l | condition |
---|---|---|---|
281 | 5 | 28 | $1 // " " |
382 | 2 | 28 | $value // "" |
398 | 4 | 2 | $value // "" |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
85 | 10 | 20 | 0 | $2 // do { my $n = hex $1; $n > 1114111 ? "\x{fffd}" : chr $n } |
109 | 2 | 4 | 0 | $2 // do { my $n = hex $1; $n > 1114111 ? "\x{fffd}" : chr $n } |
183 | 0 | 1 | 3 | $value eq '' || $value =~ /$ws/u |
1 | 6 | 24 | $op eq "~" and $value eq '' || $value =~ /$ws/u or $op =~ /\A[\^\$*]\z/u and $value eq "" | |
216 | 0 | 2 | 9 | $num1 eq "+" or $num1 eq "" |
696 | 2 | 251 | 0 | $custom_action->{$type} // $actions{$type} |
251 | 0 | 0 | ($custom_action->{$type} // $actions{$type}) // &$throw("Unknown action type '${type}'" . ($type eq 'seperator' && $custom_action->{'separator'} ? " (did you mean 'separator'?)" : "")) |