Branch Coverage

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


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