Branch Coverage

blib/lib/Time/Duration/Parse/More.pm
Criterion Covered Total %
branch 17 20 85.0


line true false branch
30 0 71 unless defined $expression
32 0 71 if exists $cache{$expression}
35 6 58 unless $cacheable
43 0 71 unless defined $expression
65 5 125 if ($e =~ s/^plus\b(\s*,?)*//) { }
7 118 elsif ($e =~ s/^minus\b(\s*,?)*//) { }
108 10 elsif ($e =~ s/^(([-+]?\d+(?:[,.]\d*)?)\s*(\w+))(\s*,?)*// or $e =~ s/^(([-+]?[,.]\d+)\s*(\w+))(\s*,?)*//) { }
6 4 elsif ($e =~ s/^midnight\b(\s*,?)*//) { }
70 36 72 unless length $u == 1
71 3 105 unless exists $units{$u}