| line |
true |
false |
branch |
|
21
|
5 |
0 |
$params{'date'} ? :
|
|
|
3 |
5 |
$params{'dt'} ? :
|
|
35
|
1 |
7 |
unless (-d $home . '/.bankholidays')
|
|
46
|
7 |
1 |
if (-f $cache and time - (stat $cache)[9] < 86400) { }
|
|
47
|
0 |
7 |
unless open my $fh, '<', $cache
|
|
60
|
0 |
1 |
unless open my $fh, '>', $cache
|
|
85
|
0 |
0 |
if $ts->coords != 2
|
|
89
|
0 |
0 |
unless @$row
|
|
90
|
0 |
0 |
if $_
|
|
93
|
0 |
0 |
if ($col)
|
|
94
|
0 |
0 |
if ($col =~ /(\d{4})/) { }
|
|
|
0 |
0 |
elsif ($col =~ /(\w+)\s(\d{1,2})(\*?)/) { }
|
|
116
|
0 |
12 |
if ($opts{'date'})
|
|
120
|
4 |
8 |
if ($opts{'Tomorrow'}) { }
|
|
|
4 |
4 |
elsif ($opts{'Yesterday'}) { }
|
|
126
|
0 |
12 |
if $param->{'dt'}->dow == 7
|
|
128
|
0 |
0 |
if int $param->{'dt'}->day == $holiday->{'day'}
|