Branch Coverage

blib/lib/DateTime/Format/Duration.pm

Criterion	Covered	Total	%
branch	102	164	62.2

line	true	false	branch
32	4	53	if $args{'base'}
42	0	298	if $_[1]
	0	298	unless $_[0]{'pattern'}
51	0	363	if $_[1]
	128	235	unless $_[0]{'base'}
55	0	3	unless ref $newbase eq 'DateTime'
60	0	239	if $_[1]
	197	42	$_[0]{'normalise'} ? :
65	0	0	$new ? :
117	31	0	if (scalar @_ == 1) { }
119	31	0	if $self->pattern
126	0	0	ref $args{'pattern'} ? :
129	0	31	unless @formats
131	30	1	$self->normalising ? :
157	31	177	ref $args{'pattern'} ? :
159	167	41	$self->normalising ? :
170	0	610	$1 ? :
	610	0	$formats{$2} ? :
185	208	0	unless wantarray
220	0	196	if $@
245	128	69	if $$self{'normalising'} and $$self{'normalising'} =~ /^ISO$/i or not $self->base
251	6	63	ref($_[0]) =~ /^DateTime::Duration/ ? :
255	0	69	if (delete $delta{'negative'})
261	0	69	if ($$self{'diagnostic'})
268	0	483	if $$self{'diagnostic'}
274	14	55	if ($start > $end)
281	0	69	if $$self{'diagnostic'}
284	0	69	if $$self{'diagnostic'}
287	0	69	if $$self{'diagnostic'}
290	0	69	if $$self{'diagnostic'}
293	0	69	if $$self{'diagnostic'}
296	0	69	if $$self{'diagnostic'}
299	0	69	if $$self{'diagnostic'}
304	0	69	if ($new_delta{'nanoseconds'} < 0)
307	0	0	if $$self{'diagnostic'}
310	4	65	if ($new_delta{'seconds'} < 0)
313	0	4	if $$self{'diagnostic'}
316	10	59	if ($new_delta{'minutes'} < 0)
319	0	10	if $$self{'diagnostic'}
322	11	58	if ($new_delta{'hours'} < 0)
325	0	11	if $$self{'diagnostic'}
328	16	53	if ($new_delta{'days'} < 0)
333	0	16	if $$self{'diagnostic'}
336	14	55	if ($new_delta{'months'} < 0)
339	0	14	if $$self{'diagnostic'}
345	0	69	if ($$self{'diagnostic'})
354	24	104	ref($_[0]) =~ /^DateTime::Duration/ ? :
356	1	127	if (delete $delta{'negative'})
363	0	128	if ($$self{'diagnostic'})
384	40	88	if $$self{'normalise'} =~ /^iso$/i
388	0	128	if ($$self{'diagnostic'})
395	0	128	if ($$self{'diagnostic'})
418	7	0	ref $_[0] ? :
419	0	7	if (delete $delta{'negative'})
421	0	7	unless ($self->base)
441	0	48	if ($level > 0) { }
450	0	48	$level ? :
489	24	0	unless $args{'as_deltas'}
505	25	2	unless $precision
508	0	2	if $frac
544	0	1	$1 ? :
548	0	7	$1 ? :
552	0	6	$1 ? :
556	0	1	$1 ? :
562	0	9	$1 ? :
566	0	11	$1 ? :
570	0	8	$1 ? :
574	0	8	$1 ? :
578	0	1	$1 ? :
583	0	0	$tempdur->can($1) ? :
584	0	0	$tempdur->can($2) ? :
587	0	2	$1 ? :
597	0	28	if $field_list =~ /(\%\w)/g
608	41	639	$small < 0 ? :
618	35	875	if ($delta{$_} < 0) { }
	139	736	elsif ($delta{$_} > 0) { }
624	22	108	if ($negatives and not $positives) { }
	2	212	elsif ($negatives and $positives) { }
626	31	123	if ($delta{$_} < 0)
636	2	6	if ($delta{$_} < 0) { }
	0	6	elsif ($delta{$_} > 0) { }
644	2	0	if ($make)