Branch Coverage

blib/lib/Perl/Critic/Policy/HTTPCookies.pm
Criterion Covered Total %
branch 17 18 94.4


line true false branch
26 6 98 if ($is_new_cookies) { }
33 26 72 if ($is_new_ua)
34 20 6 if (&blessed($args_elem) and $args_elem->isa('PPI::Structure::List'))
37 12 8 if ($self->_cookie_jar_violation($expression))
53 18 34 if ($token =~ /\bcookie_jar\b/)
55 17 0 if (&blessed($possible_operator) and $possible_operator->isa('PPI::Token::Operator') and $possible_operator =~ /^(?:=>|,)$/)
61 12 5 if (&blessed($possible_hashref) and $possible_hashref->isa('PPI::Structure') and $possible_hashref->braces eq '{}')
81 29 173 if ($elem eq $class_name and is_class_name($elem) and $elem->snext_sibling eq '->' and $elem->snext_sibling->snext_sibling eq 'new') { }
3 276 elsif ($elem eq 'new' and $elem->snext_sibling eq $class_name) { }