| line |
!l |
l&&!r |
l&&r |
condition |
|
181
|
2 |
0 |
0 |
exists $option{'our_addr'} and $option{'our_addr'} |
|
184
|
0 |
0 |
0 |
ref $option{'our_addr'} and &Scalar::Util::blessed($option{'our_addr'}) |
|
|
0 |
0 |
0 |
ref $option{'our_addr'} and &Scalar::Util::blessed($option{'our_addr'}) and $option{'our_addr'}->isa('FTN::Addr') |
|
200
|
0 |
0 |
2 |
exists $option{'domain'} and $option{'domain'} |
|
209
|
0 |
0 |
2 |
exists $option{'zone'} and $option{'zone'} |
|
216
|
0 |
0 |
2 |
$option{'zone'} =~ /^\d+$/ and 1 <= $option{'zone'} |
|
|
0 |
0 |
2 |
$option{'zone'} =~ /^\d+$/ and 1 <= $option{'zone'} and $option{'zone'} <= 32767 |
|
223
|
0 |
0 |
2 |
exists $option{'domain_abbrev'} and defined $option{'domain_abbrev'} |
|
|
0 |
0 |
2 |
exists $option{'domain_abbrev'} and defined $option{'domain_abbrev'} and ref $option{'domain_abbrev'} eq 'HASH' |
|
241
|
0 |
0 |
0 |
defined $option{'reference_file_read_line_transform_sub'} and 'CODE' eq ref $option{'reference_file_read_line_transform_sub'} |
|
255
|
0 |
0 |
0 |
defined $option{'maximum_session_time'} and $option{'maximum_session_time'} =~ /^\d+$/ |
|
|
0 |
0 |
0 |
defined $option{'maximum_session_time'} and $option{'maximum_session_time'} =~ /^\d+$/ and $option{'maximum_session_time'} |
|
288
|
0 |
0 |
0 |
$file_prop->{'size'} and exists $self->{'reference_file_read_line_transform_sub'} |
|
304
|
0 |
0 |
0 |
$ext_control_file{$lc_ext} eq 'busy' and exists $self->{'maximum_session_time'} |
|
|
0 |
0 |
0 |
$ext_control_file{$lc_ext} eq 'busy' and exists $self->{'maximum_session_time'} and $self->{'maximum_session_time'} * 2 < $age |
|
380
|
0 |
0 |
0 |
$dz_out =~ /^($domain_abbr_re)(?:\.([1-7]?[0-9a-f]{3}))?$/i and $1 eq $self->{'domain_abbrev'}{$self->{'domain'}} || defined $2 |
|
389
|
0 |
0 |
0 |
1 <= $zone and $zone <= 32767 |
|
421
|
0 |
0 |
0 |
lc $ext eq 'pnt' and -d $full_name_fs |
|
520
|
0 |
0 |
0 |
defined $addr and ref $addr |
|
|
0 |
0 |
0 |
defined $addr and ref $addr and &Scalar::Util::blessed($addr) |
|
|
0 |
0 |
0 |
defined $addr and ref $addr and &Scalar::Util::blessed($addr) and $addr->isa('FTN::Addr') |
|
556
|
0 |
0 |
0 |
exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net} and exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net}{$addr->node} |
|
|
0 |
0 |
0 |
exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net} and exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net}{$addr->node} and exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net}{$addr->node}{$addr->point} |
|
|
0 |
0 |
0 |
exists $self->{'scanned'}{$addr->domain} and exists $self->{'scanned'}{$addr->domain}{$addr->zone} |
|
577
|
0 |
7 |
8 |
$domain eq $self->{'domain'} and $zone == $self->{'zone'} |
|
582
|
0 |
0 |
15 |
exists $self->{'scanned'}{$domain} and exists $self->{'scanned'}{$domain}{$zone} |
|
|
0 |
0 |
15 |
exists $self->{'scanned'}{$domain} and exists $self->{'scanned'}{$domain}{$zone} and $domain ne $self->{'domain'} || $zone != $self->{'zone'} || grep((length $_ == length $best_match), keys %{$$self{'scanned'}{$domain}{$zone};}) |
|
653
|
0 |
0 |
15 |
length $_ == length $dz_out && exists $self->{'scanned'}{$domain}{$zone}{$_}{$net} && exists $self->{'scanned'}{$domain}{$zone}{$_}{$net}{$node} && exists $self->{'scanned'}{$domain}{$zone}{$_}{$net}{$node}{'points_dir'} |
|
719
|
0 |
0 |
0 |
@_ and defined $_[0] |
|
|
0 |
0 |
0 |
@_ and defined $_[0] and 'CODE' eq ref $_[0] |
|
842
|
0 |
0 |
0 |
defined $type and grep(($type eq $_), @flavoured, keys %control_file_extension) |
|
869
|
0 |
0 |
0 |
defined $flavour and exists $flavour_extension{$flavour} |
|
881
|
0 |
0 |
0 |
defined $_[0] and 'CODE' eq ref $_[0] |
|
904
|
0 |
0 |
0 |
length $_ == length $dz_out && exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net} && exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net}{$addr->node} && exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net}{$addr->node}{$addr->point} && exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net}{$addr->node}{$addr->point}{$type} && (!$flavoured || exists $self->{'scanned'}{$addr->domain}{$addr->zone}{$_}{$addr->net}{$addr->node}{$addr->point}{$type}{$flavour}) |
|
1001
|
0 |
0 |
0 |
$type eq 'reference_file' and $file_prop{'size'} |
|
|
0 |
0 |
0 |
$type eq 'reference_file' and $file_prop{'size'} and exists $self->{'reference_file_read_line_transform_sub'} |