Branch Coverage

blib/lib/Sub/Infix.pm
Criterion Covered Total %
branch 20 24 83.3


line true false branch
28 1 0 eval { do { require Scalar::Util } } ? :
43 2 3 $_[2] ? :
44 3 2 $_[2] ? :
45 2 0 $_[2] ? :
46 1 2 $_[2] ? :
58 7 8 if (blessed $left and $left->isa('Sub::Infix::PartialApplication')) { }
8 0 elsif (blessed $right and $right->isa('Sub::Infix::PartialApplication')) { }
60 0 7 if $op eq '<<'
65 1 7 if $op eq '>>'
73 7 7 if (exists $$self{'op'}) { }
76 1 4 unless ($combo eq '<>' or $combo eq '/infix/' or $combo eq '|infix|')
86 6 7 if (exists $$self{'left'} and exists $$self{'right'})