| 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 ? : |