Branch Coverage

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


line true false branch
34 327 2 unless $elem =~ /$PRINT_RX/
35 0 2 unless is_function_call($elem)
40 0 2 unless $sib[0]
43 0 2 if ($sib[0]->isa("PPI::Structure::List"))
45 0 0 unless $expr
47 0 0 unless $sib[0]
51 0 2 unless $sib[1]
53 0 2 unless $sib[2]
56 0 2 unless $sib[0]->isa("PPI::Token::Symbol") and $sib[0] =~ /\A \$/msx or $sib[0]->isa("PPI::Token::Word")
60 0 2 if is_perl_builtin($sib[0])
61 0 2 if exists $POSTFIX_WORDS{$sib[0]}
64 0 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")