File: | lib/Time/DoAfter.pm |
Coverage: | 75.0% |
line | % | coverage | branch | |
---|---|---|---|---|
25 | 50 | T | F | !ref($thing) && defined $thing && !($thing =~ /^[\d\.]+$/) ? : |
50 | T | F | ref $thing eq 'ARRAY' || !ref($thing) && defined $thing && $thing =~ /^[\d\.]+$/ ? : | |
100 | T | F | ref $thing eq 'CODE' ? : | |
30 | 50 | T | F | if $type eq 'error' |
33 | 50 | T | F | if exists $set->{$type} |
45 | 100 | T | F | if $singleton |
62 | 100 | T | F | if ($self->{$label}{'last'}) |
64 | 50 | T | F | if (ref $self->{$label}{'wait'}) { } |
74 | 50 | T | F | if $sleep > 0 |
97 | 100 | T | F | defined $label ? : |
104 | 100 | T | F | if $label |
105 | 100 | T | F | if defined $last |