Branch Coverage

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


line true false branch
26 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' ? :
31 0 19 if $type eq 'error'
34 4 15 if exists $set->{$type}
46 3 1 if ($singleton)
69 3 2 if ($self->{$label}{'last'})
71 0 3 if (ref $self->{$label}{'wait'}) { }
81 0 3 if ($sleep > 0)
110 3 1 defined $label ? :
111 1 3 if defined $time
120 2 2 if $label
121 2 2 if defined $last
129 3 0 defined $label ? :
130 1 2 if ref $sub eq 'CODE'
138 6 0 defined $label ? :
139 1 5 if defined $wait
147 3 0 defined $label ? :
148 2 1 if (ref $$value_ref eq 'ARRAY') { }