Branch Coverage

blib/lib/Time/DoAfter.pm
Criterion Covered Total %
branch 31 38 81.5


line true false branch
25 10 0 !ref($thing) && defined $thing && !($thing =~ /^[\d\.]+$/) ? :
3 10 ref $thing eq 'ARRAY' || !ref($thing) && defined $thing && $thing =~ /^[\d\.]+$/ ? :
6 13 ref $thing eq 'CODE' ? :
30 0 19 if $type eq 'error'
33 4 15 if exists $set->{$type}
45 3 1 if ($singleton)
68 3 2 if ($self->{$label}{'last'})
70 0 3 if (ref $self->{$label}{'wait'}) { }
80 0 3 if ($sleep > 0)
109 3 1 defined $label ? :
110 1 3 if defined $time
119 2 2 if $label
120 2 2 if defined $last
128 3 0 defined $label ? :
129 1 2 if ref $sub eq 'CODE'
137 6 0 defined $label ? :
138 1 5 if defined $wait
146 3 0 defined $label ? :
147 2 1 if (ref $$value_ref eq 'ARRAY') { }