| line |
true |
false |
branch |
|
140
|
0 |
2 |
$Opt->cold ? : |
|
147
|
1 |
2 |
$Opt->cold ? : |
|
153
|
0 |
0 |
if ($Opt->outclip and $USE_WINCLIP) |
|
154
|
0 |
0 |
unless open $new_fh, ">", \$output |
|
160
|
0 |
3 |
unless @files |
|
164
|
0 |
3 |
if ($file eq $DASH) { } |
|
167
|
0 |
3 |
unless open $fh, "<", $file |
|
180
|
1 |
2 |
if ($Opt->peryear) { } |
|
187
|
0 |
3 |
if ($Opt->nogaps) |
|
206
|
0 |
0 |
if ($Opt->outclip and $USE_WINCLIP) |
|
234
|
0 |
14076 |
if $data eq $EMPTY |
|
235
|
0 |
14076 |
if $data =~ / \A Notes: /msux |
|
240
|
3 |
14073 |
if ($lineno == 1) |
|
241
|
0 |
3 |
unless $year eq "Year" and $tmax =~ / \A TMAX /msux and $tmin =~ / \A TMIN /msux |
|
246
|
3 |
14070 |
unless $year =~ / \A \d{4} \Z /msux |
|
250
|
4690 |
9380 |
$Opt->cold ? : |
|
252
|
243 |
13827 |
if not defined $value or $value eq $EMPTY |
|
256
|
4575 |
9252 |
$Opt->cold ? : |
|
262
|
1185 |
12642 |
if ($is_extreme) { } |
|
|
545 |
12097 |
elsif ($cb->break('XT')) { } |
|
263
|
544 |
641 |
if $cb->break("XT") |
|
270
|
3 |
13824 |
if ($cb->break("STNID")) |
|
310
|
280 |
58 |
if $count < $ndays |
|
316
|
40 |
18 |
$Opt->cold ? : |
|
339
|
0 |
1 |
$Opt->cold ? : |
|
351
|
189 |
18 |
if $count < $ndays |
|
401
|
0 |
3 |
unless &GetOptionsFromArray($argv_aref, \%opt, @options) |
|
418
|
0 |
3 |
if $Opt->usage |
|
419
|
0 |
3 |
if $Opt->help |