| line |
true |
false |
branch |
|
119
|
0 |
4 |
unless $#_ == 0
|
|
120
|
0 |
4 |
unless $_[0]
|
|
121
|
4 |
0 |
ref $_[0] ? :
|
|
132
|
1 |
2 |
unless ($month)
|
|
134
|
1 |
0 |
unless ($year, $month) = $spec =~ /^(\d{4})(\d{2})$/
|
|
138
|
1 |
1 |
unless $self->has_product($name)
|
|
148
|
0 |
7 |
unless open my $fh, '<', $file
|
|
162
|
27 |
7 |
if $self->calendar->{$year}
|
|
166
|
0 |
7 |
unless dist_dir('Finance-TW-TAIFEX')
|
|
|
7 |
0 |
unless -e $dist_dir
|
|
197
|
1 |
0 |
if ($nth < 0)
|
|
217
|
1 |
2 |
if $nth < 0
|
|
220
|
1 |
1 |
if ($nth + $offset < 0)
|
|
317
|
0 |
0 |
unless (-s $rpt_f)
|
|
319
|
0 |
0 |
unless my $f = $self->can('daily_' . $type . '_uri')
|
|
322
|
0 |
0 |
unless (-s $tmp)
|
|
325
|
0 |
0 |
if &HTTP::Status::is_error($rc)
|
|
329
|
0 |
0 |
unless ($zip->read($tmp) == 0)
|
|
333
|
0 |
0 |
unless ($zip->extractMember($rpt, $rpt_f) == 0)
|