Branch Coverage

blib/lib/XAO/DO/Web/Utility.pm
Criterion Covered Total %
branch 17 110 15.4


line true false branch
42 0 7 if ($mode eq 'select-time-range') { }
0 7 elsif ($mode eq 'tracking-url') { }
0 7 elsif ($mode eq 'config-param') { }
0 7 elsif ($mode eq 'pass-cgi-params') { }
0 7 elsif ($mode eq 'current-url') { }
0 7 elsif ($mode eq 'base-url') { }
0 7 elsif ($mode eq 'show-pagedesc') { }
7 0 elsif ($mode eq 'number-ordinal-suffix') { }
114 0 0 if (lc $carrier eq 'usps') { }
0 0 elsif (lc $carrier eq 'ups') { }
0 0 elsif (lc $carrier eq 'fedex') { }
0 0 elsif (lc $carrier eq 'dhl') { }
0 0 elsif (lc $carrier eq 'yellow') { }
0 0 elsif (lc $carrier eq 'sefl') { }
162 0 0 unless $args->{'name'}
165 0 0 if not defined $value and defined $args->{'default'}
166 0 0 if defined $value
236 0 0 unless length $param
237 0 0 if (index($param, "*") != -1)
240 0 0 unless index($p, $param) == 0
253 0 0 unless length $param
254 0 0 if (index($param, "*") != -1)
257 0 0 unless defined $p
258 0 0 unless index($p, $param) == 0
271 0 0 if $except{$param}
274 0 0 unless defined $value
276 0 0 if ($result eq 'form') { }
280 0 0 if $html
287 0 0 if (defined $html)
288 0 0 if $args->{'prefix'}
338 1 6 if $number < 0
342 4 3 if ($number > 10 and $number < 20 or $nl == 0 or $nl > 3) { }
1 2 elsif ($nl == 1) { }
1 1 elsif ($nl == 2) { }
0 1 elsif ($nl == 2) { }
440 0 0 if ($type eq 'quarters') { }
0 0 elsif ($type eq 'days') { }
446 0 0 if ($args->{'start'})
448 0 0 if ($y > 1000 and $q > 0 and $q < 5) { }
456 0 0 unless ($year)
462 0 0 if ($args->{'end'})
464 0 0 if ($y > 1000 and $q > 0 and $q < 5) { }
472 0 0 unless ($lastyear)
476 0 0 if ($year > $lastyear or $year == $lastyear and $quarter > $lastquarter)
483 0 0 if ($args->{'ascend'}) { }
490 0 0 $args->{'current'} && $args->{'current'} eq $value ? :
496 0 0 if ($quarter > 4)
509 0 0 $args->{'current'} && $args->{'current'} eq $value ? :
515 0 0 if ($lastquarter < 1)
532 0 0 unless ($end)
538 0 0 if ($ct[4] >= 12)
549 0 0 if ($args->{'ascend'}) { }
550 0 0 if ($end < $start)
561 0 0 if ($end > $start)
577 0 0 $args->{'current'} && $args->{'current'} == $day ? :