Branch Coverage

blib/lib/Time/Duration/Parse.pm
Criterion Covered Total %
branch 8 8 100.0


line true false branch
28 5 2042 if ($timespec =~ /^\s*(-?\d+(?:[.,]\d+)?)\s*$/)
39 3065 3076 unless length $unit == 1
41 6139 2 if (my $value = $Units{$unit}) { }
49 1 2044 if ($timespec =~ /\S/)