Branch Coverage
blib/lib/Time/Consts.pm
Criterion
Covered
Total
%
branch
8
8
100.0
line
true
false
branch
29
4
9
unless @_
33
1
8
if (my(@bad) = grep((!$ok{uc $_} && $_ ne ':ALL'), @args))
38
1
7
if @unit > 1
44
2
20
$_ eq ':ALL' ? :