Condition Coverage

blib/lib/Tie/STDOUT.pm
Criterion Covered Total %
condition 5 6 83.3


or 2 conditions

line l !l condition
116 1 1 $params{'print'} || sub { print @_; }
0 2 $params{'syswrite'} || sub { my($buf, $len, $offset) = @_; syswrite STDOUT, $buf, $len, defined $offset ? $offset : 0; }
119 1 1 $params{'printf'} || sub { $$self{'print'}(sprintf($_[0], @_[1 .. $#_])); }