| line |
true |
false |
branch |
|
41
|
5 |
0 |
$params{'date'} ? : |
|
|
3 |
5 |
$params{'dt'} ? : |
|
60
|
0 |
8 |
unless (-d $home . '/.bankholidays') |
|
71
|
8 |
0 |
if (-f $cache and time - (stat $cache)[9] < 86400) { } |
|
72
|
0 |
8 |
unless open my $fh, '<', $cache |
|
86
|
0 |
0 |
unless open my $fh, '>', $cache |
|
111
|
16 |
8 |
if $ts->coords != 2 |
|
115
|
0 |
88 |
unless @$row |
|
116
|
528 |
0 |
if $_ |
|
119
|
528 |
0 |
if ($col) |
|
120
|
40 |
488 |
if ($col =~ /(\d{4})/) { } |
|
|
400 |
88 |
elsif ($col =~ /(\w+)\s(\d{1,2})(\*?)/) { } |
|
142
|
0 |
12 |
if ($opts{'date'}) |
|
146
|
4 |
8 |
if ($opts{'Tomorrow'}) { } |
|
|
4 |
4 |
elsif ($opts{'Yesterday'}) { } |
|
152
|
0 |
12 |
if $$param{'dt'}->dow == 7 |
|
154
|
6 |
6 |
if int $$param{'dt'}->day == $$holiday{'day'} |