Branch Coverage

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


line true false branch
26 4 76 if ($is_new_cookies) { }
33 21 55 if ($is_new_ua)
34 17 4 if (&blessed($args_elem) and $args_elem->isa('PPI::Structure::List'))
37 11 6 if ($self->_cookie_jar_violation($expression))
53 17 28 if ($token =~ /cookie_jar/)
55 16 0 if (&blessed($possible_operator) and $possible_operator->isa('PPI::Token::Operator') and $possible_operator =~ /^(?:=>|,)$/)
61 11 5 if (&blessed($possible_hashref) and $possible_hashref->isa('PPI::Structure') and $possible_hashref->braces eq '{}')
81 22 134 if ($elem eq $class_name and is_class_name($elem) and $elem->snext_sibling eq '->' and $elem->snext_sibling->snext_sibling eq 'new') { }
3 214 elsif ($elem eq 'new' and $elem->snext_sibling eq $class_name) { }