Branch Coverage

blib/lib/Perl/Critic/Policy/InputOutput/RequireBracedFileHandleWithPrint.pm
Criterion Covered Total %
branch 14 30 46.6


line true false branch
34 329 3 unless $elem =~ /$PRINT_RX/
35 0 3 unless is_function_call($elem)
40 0 3 unless $sib[0]
43 0 3 if ($sib[0]->isa("PPI::Structure::List"))
45 0 0 unless $expr
47 0 0 unless $sib[0]
51 0 3 unless $sib[1]
53 0 3 unless $sib[2]
56 0 3 unless $sib[0]->isa("PPI::Token::Symbol") and $sib[0] =~ /\A \$/msx or $sib[0]->isa("PPI::Token::Word")
60 0 3 if is_perl_builtin($sib[0])
61 0 3 if exists $POSTFIX_WORDS{$sib[0]}
64 1 2 unless $sib[1]->isa("PPI::Token::Whitespace")
67 0 2 if $sib[2]->isa("PPI::Token::Operator")
70 2 0 if exists $POSTFIX_WORDS{$sib[2]}
72 0 0 if $sib[0]->isa("PPI::Structure::Block")