| line |
true |
false |
branch |
|
35
|
0 |
0 |
if (@_) { } |
|
51
|
0 |
0 |
if $i =~ /\G#.*/cg |
|
52
|
0 |
0 |
if $i =~ m[\G//.*]cg |
|
53
|
0 |
0 |
if ($i =~ m[\G/\*]cg) |
|
56
|
0 |
0 |
unless $self->read_line or $i ne '' |
|
75
|
0 |
0 |
if ($i =~ /\G([^"]+)/cg) |
|
76
|
0 |
0 |
if $i =~ /\G"/cg |
|
78
|
0 |
0 |
if ($self->read_line) { } |
|
|
0 |
0 |
elsif ($i eq '') { } |
|
102
|
0 |
0 |
if $self->check_comment |
|
103
|
0 |
0 |
if ($j =~ /\G(\d+)/cg) |
|
104
|
0 |
0 |
if $j =~ /\G(\.\.)/cg or $j =~ m[\G([^./"*!{};\s]+)]cg |
|
106
|
0 |
0 |
if ($j =~ /\G\./cg) |
|
110
|
0 |
0 |
if ($dots > 3 or substr($i, -1) eq '.') |
|
114
|
0 |
0 |
if ($dots == 1) { } |
|
|
0 |
0 |
elsif ($dots == 2) { } |
|
126
|
0 |
0 |
if $self->check_comment |
|
127
|
0 |
0 |
if ($i =~ /\G(\d+)/cg) |
|
128
|
0 |
0 |
if $i =~ /\G\./cg |
|
129
|
0 |
0 |
if $i =~ m[\G([^/"*!{};\s]+)]cg |
|
137
|
0 |
0 |
if $self->check_comment |
|
139
|
0 |
0 |
if $i =~ /\G\s+/cg |
|
140
|
0 |
0 |
if $i =~ m[\G([*/!{};])]cg |
|
141
|
0 |
0 |
if $i =~ /\G"/cg |
|
142
|
0 |
0 |
if $i =~ /\G(\d+)/cg |
|
143
|
0 |
0 |
if $i =~ /\G(.)/cg |
|
145
|
0 |
0 |
unless $i =~ /\G\Z/cg |
|
146
|
0 |
0 |
unless $self->read_line or $i ne '' |
|
153
|
0 |
0 |
if $$self{'_token'} eq 'W' |
|
154
|
0 |
0 |
if $$self{'_token'} eq '"' |
|
155
|
0 |
0 |
if $$self{'_token'} eq '#' or $$self{'_token'} eq '.' |
|
157
|
0 |
0 |
if $$self{'_token'} eq "\cD" |
|
175
|
0 |
0 |
unless $map |
|
176
|
0 |
0 |
if ($need_article) { } |
|
186
|
0 |
0 |
unless $nolex |
|
187
|
0 |
0 |
unless ref $token |
|
189
|
0 |
0 |
if (ref $_) { } |
|
190
|
0 |
0 |
unless $$self{'_token'} eq 'W' |
|
192
|
0 |
0 |
if $_ eq $$self{'_data'} |
|
197
|
0 |
0 |
if $_ eq $$self{'_token'} |
|
200
|
0 |
0 |
if (@{$token;} == 1) { } |
|
202
|
0 |
0 |
if ref $token |
|
215
|
0 |
0 |
unless $$self{'_fh'} = 'IO::File'->new($file, 'r') |
|
231
|
0 |
0 |
if defined $value |
|
242
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
243
|
0 |
0 |
if ($$self{'_token'} eq '!') |
|
248
|
0 |
0 |
if ($$self{'_token'} eq '{') |
|
252
|
0 |
0 |
if ($$self{'_token'} eq 'W' or $$self{'_token'} eq '"') |
|
257
|
0 |
0 |
$$self{'_token'} eq '#' ? : |
|
258
|
0 |
0 |
if ($$self{'_token'} eq ';') |
|
275
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
288
|
0 |
0 |
if ($data =~ /^(\d+)([kmg])$/i) |
|
317
|
0 |
0 |
if ($$self{'_token'} ne '#') |
|
318
|
0 |
0 |
if $flags =~ /^0/ |
|
336
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
354
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
356
|
0 |
0 |
if ($temp =~ /^print-/) { } |
|
|
0 |
0 |
elsif ($temp eq 'null') { } |
|
|
0 |
0 |
elsif ($temp eq 'file') { } |
|
|
0 |
0 |
elsif ($temp eq 'syslog') { } |
|
|
0 |
0 |
elsif ($temp eq 'severity') { } |
|
359
|
0 |
0 |
if exists $options{'dest'} |
|
363
|
0 |
0 |
if exists $options{'dest'} |
|
370
|
0 |
0 |
if $$self{'_token'} eq ';' |
|
371
|
0 |
0 |
if ($$self{'_data'} eq 'size') { } |
|
375
|
0 |
0 |
if ($$self{'_token'} eq '#') { } |
|
|
0 |
0 |
elsif ($$self{'_data'} eq 'unlimited') { } |
|
386
|
0 |
0 |
if exists $options{'dest'} |
|
398
|
0 |
0 |
if ($options{'severity'} eq 'debug') |
|
400
|
0 |
0 |
if ($$self{'_token'} eq '#') { } |
|
420
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
421
|
0 |
0 |
if ($$self{'_data'} eq 'category') { } |
|
573
|
0 |
0 |
if ($$self{'_data'} eq 'secret') { } |
|
599
|
0 |
0 |
if $$self{'_token'} eq ';' |
|
600
|
0 |
0 |
if ($$self{'_data'} eq 'inet') { } |
|
603
|
0 |
0 |
$$self{'_token'} eq '*' ? : |
|
639
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
640
|
0 |
0 |
if ($$self{'_data'} eq 'bogus') |
|
644
|
0 |
0 |
if ($$self{'_data'} eq 'support-ixfr') |
|
649
|
0 |
0 |
if ($$self{'_data'} eq 'transfers') |
|
654
|
0 |
0 |
if ($$self{'_data'} eq 'transfer-format') |
|
664
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
681
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
695
|
0 |
0 |
if ($$self{'_token'} eq ';') { } |
|
|
0 |
0 |
elsif ($$self{'_token'} eq '{') { } |
|
703
|
0 |
0 |
if ($$self{'_token'} eq ';') |
|
715
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
717
|
0 |
0 |
if ($temp eq 'type') |
|
723
|
0 |
0 |
if ($temp eq 'file' or $temp eq 'ixfr-base') |
|
728
|
0 |
0 |
if ($temp eq 'masters' or $temp eq 'also-notify' or $temp eq 'forwarders') |
|
733
|
0 |
0 |
if ($temp eq 'dialup' or $temp eq 'notify') |
|
737
|
0 |
0 |
if ($temp eq 'max-transfer-time-in') |
|
742
|
0 |
0 |
if ($temp eq 'check-names') |
|
746
|
0 |
0 |
if ($temp eq 'forward') |
|
750
|
0 |
0 |
if ($temp eq 'pubkey') |
|
759
|
0 |
0 |
if (not exists $options{'type'}) { } |
|
772
|
0 |
0 |
if $$self{'_token'} eq '}' |
|
776
|
0 |
0 |
if (ref $type) { } |
|
783
|
0 |
0 |
unless $ate_semi |
|
785
|
0 |
0 |
unless $did_handle_option |
|
797
|
0 |
0 |
if ($$self{'_token'} eq "\cD") |
|
798
|
0 |
0 |
if ($$self{'_fhs'} and @{$$self{'_fhs'};}) |
|
807
|
0 |
0 |
if ($$self{'_data'} eq 'acl') |
|
816
|
0 |
0 |
if ($$self{'_data'} eq 'include') |
|
825
|
0 |
0 |
if ($$self{'_data'} eq 'key') |
|
829
|
0 |
0 |
if ($$self{'_data'} eq 'logging') |
|
830
|
0 |
0 |
if ($$self{'_flags'}{'seen_logging'}++) |
|
836
|
0 |
0 |
if ($$self{'_data'} eq 'options') |
|
837
|
0 |
0 |
if ($$self{'_flags'}{'seen_options'}++) |
|
843
|
0 |
0 |
if ($$self{'_data'} eq 'controls') |
|
847
|
0 |
0 |
if ($$self{'_data'} eq 'server') |
|
851
|
0 |
0 |
if ($$self{'_data'} eq 'trusted-keys') |
|
855
|
0 |
0 |
if ($$self{'_data'} eq 'zone') |
|
875
|
0 |
0 |
unless ref $self |
|
883
|
0 |
0 |
unless ref $self |
|
885
|
0 |
0 |
@_ ? : |
|
894
|
0 |
0 |
unless ref $self |
|
896
|
0 |
0 |
@_ ? : |