blib/lib/WWW/Mechanize/Plugin/Sleepy.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 14 | 78.5 |
line | true | false | branch |
---|---|---|---|
14 | 0 | 1 | if defined $args{'sleep'} |
33 | 5 | 1 | defined $args{'sleep'} ? : |
44 | 2 | 4 | if defined $arg |
53 | 0 | 8 | if (not defined $arg) { } |
1 | 7 | elsif (my($from, $to) = $arg =~ /^(\d+)\.\.(\d+)$/) { } | |
3 | 4 | elsif (not $arg =~ /\D/) { } | |
57 | 0 | 1 | if $1 >= $2 |