| line |
true |
false |
branch |
|
82
|
0 |
4 |
if (exists $args{'cache'} and not -d $args{'cache'}) { } |
|
86
|
3 |
1 |
if exists $args{'cache'} |
|
93
|
3 |
1 |
if ($cache) |
|
94
|
0 |
3 |
unless open my $cachefile, '<', $cache |
|
101
|
1 |
3 |
unless ($html) |
|
105
|
0 |
1 |
unless $http->is_success |
|
107
|
0 |
1 |
if ($cache and $write) |
|
109
|
0 |
0 |
unless open my $cachefile, '>', $cache |
|
136
|
322 |
1142 |
unless $link =~ m[/channel/[a-z\-]+/\d+/] |
|
139
|
504 |
638 |
unless $channel_name |
|
140
|
46 |
592 |
if $channel_name eq 'New' |
|
186
|
0 |
0 |
if ($success) { } |
|
198
|
0 |
1 |
if $@ |
|
206
|
0 |
2 |
unless (exists $args{'channel'}) |
|
211
|
1 |
1 |
if (exists $args{'timezone'}) |
|
213
|
1 |
0 |
if ($success) { } |
|
220
|
2 |
188 |
if (lc $_ eq lc $input_channel) |
|
222
|
0 |
2 |
unless exists $WWW::BurrpTV::CHANNELS{$input_channel} |
|
227
|
0 |
2 |
unless $http->is_success |
|
239
|
224 |
4 |
if $_[0]{'class'} |
|
269
|
0 |
68 |
unless $episode |
|
271
|
25 |
43 |
if $show =~ /Season \d+/ |
|
285
|
35 |
33 |
if ($am_or_pm eq 'PM') { } |
|
286
|
3 |
32 |
if ($hour == 12) { } |
|
291
|
5 |
28 |
if ($hour == 12) { } |
|
316
|
68 |
0 |
if ($today) { } |