| line |
true |
false |
branch |
|
128
|
0 |
0 |
if ($Opt->outclip and $USE_WINCLIP) |
|
129
|
0 |
0 |
unless open $new_fh, ">", \$output |
|
135
|
0 |
1 |
unless @files |
|
139
|
0 |
1 |
if ($file eq $DASH) { } |
|
142
|
0 |
1 |
unless open $fh, "<", $file |
|
159
|
0 |
0 |
if ($Opt->outclip and $USE_WINCLIP) |
|
185
|
2 |
12 |
if $data =~ / \A \s* \Z /msux |
|
190
|
1 |
11 |
if ($lineno == 1) |
|
191
|
0 |
1 |
unless $stnid eq "StationId" and $active eq "Active" |
|
196
|
1 |
10 |
unless $active |
|
200
|
0 |
10 |
unless @rangelist |
|
226
|
0 |
10 |
if ($active =~ / \A \d\d,\d\d\d,\d\d\d \Z /msux) |
|
230
|
0 |
0 |
if ($s =~ / (\d\d\d\d) (\d\d\d\d) /msux) |
|
235
|
0 |
10 |
unless ($active =~ / \A $RANGELIST_RE \Z /msux) |
|
279
|
0 |
1 |
unless &GetOptionsFromArray($argv_aref, \%opt, @options) |
|
296
|
0 |
1 |
if $Opt->usage |
|
297
|
0 |
1 |
if $Opt->help |