Branch Coverage

blib/lib/Perl/Critic/Policy/Plicease/ProhibitSignaturesAndAtUnderscore.pm
Criterion Covered Total %
branch 16 20 80.0


line true false branch
36 0 4 unless $include->type eq "use"
38 0 0 if ($include->version and "version"->parse($include->version) >= "version"->parse("v5.36") or $include->pragma eq "feature" and $include =~ /\bsignatures\b/ or $include->pragma eq "experimental" and $include =~ /\bsignatures\b/ or $include->module eq "Mojo::Base" and $include =~ /-signatures\b/ or $include->module eq "Mojolicious::Lite" and $include =~ /-signatures\b/ or exists $self->{'_signature_enablers'}{$include->module})
50 4 1 if ($has_signatures)
55 1 4 unless $sub->find("PPI::Structure::Signature")
5 0 $PPI::Document::VERSION > 1.279 ? :
1 4 unless $PPI::Document::VERSION > "1.279" ? @{[] unless $sub->find("PPI::Structure::Signature");} : defined $sub->prototype
73 1 45 if $children[$i]->isa("PPI::Statement::Sub")
74 1 4 if $i >= 1 and $children[$i]->isa("PPI::Structure::Block") and $children[$i - 1]->isa("PPI::Token::Word") and $children[$i - 1]->literal eq "sub"
76 2 42 if ($children[$i]->isa('PPI::Token::Symbol') and $children[$i]->symbol eq '@_') { }
17 25 elsif ($children[$i]->can('schildren')) { }