Branch Coverage

HTML/Calendar/Simple.pm
Criterion Covered Total %
branch 40 52 76.9


line true false branch
99 27 1 if (defined $ref and ref $ref eq 'HASH')
100 26 1 exists $$ref{'month'} ? :
101 26 1 exists $$ref{'year'} ? :
103 27 0 defined $valid_day ? :
132 25 1022 unless (exists $$self{'cgi'})
212 0 4 unless my $ref = shift()
213 0 4 unless ref $ref eq 'HASH'
214 0 4 unless my $day = $self->_date_obj($self->year, $self->month, $$ref{'day'})
219 47 4 unless $day_ref and $$day_ref{'date'} == $day
230 82 1009 unless my $ref = shift()
231 0 1009 if $ref eq $self->_spacer
233 7 1002 exists $$ref{'day_link'} ? :
239 1016 14 if $key eq 'date' or $key eq 'day_link'
241 6 8 $self->can($method) ? :
251 0 6 unless my $ref = shift()
252 1 5 unless ref $ref eq 'ARRAY'
280 0 1 unless $pic
286 1 34 exists $$self{'picture'} ? :
309 1 32 defined $alt_args && ref $alt_args eq 'HASH' && exists $$alt_args{'border'} ? :
322 0 33 if $self->picture
354 0 24 if (defined $$ref{$month})
370 1 1 defined $year ? :
373 2 0 defined $when ? :
384 0 2 defined $$ref{'pin_up'} ? :
385 0 2 if $pic
430 1 31 $_ eq $self->_spacer ? :