| line |
!l |
l&&!r |
l&&r |
condition |
|
170
|
2 |
0 |
0 |
exists $option{'our_addr'} and $option{'our_addr'} |
|
173
|
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') |
|
189
|
0 |
2 |
0 |
exists $option{'domain'} and $option{'domain'} |
|
198
|
0 |
2 |
0 |
exists $option{'zone'} and $option{'zone'} |
|
205
|
0 |
0 |
2 |
$option{'zone'} =~ /^\d+$/ and 1 <= $option{'zone'} |
|
|
0 |
0 |
2 |
$option{'zone'} =~ /^\d+$/ and 1 <= $option{'zone'} and $option{'zone'} <= 32767 |
|
212
|
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' |
|
230
|
0 |
0 |
0 |
defined $option{'reference_file_read_line_transform_sub'} and 'CODE' eq ref $option{'reference_file_read_line_transform_sub'} |
|
244
|
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'} |
|
277
|
0 |
0 |
0 |
$file_prop->{'size'} and exists $self->{'reference_file_read_line_transform_sub'} |
|
293
|
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 |
|
369
|
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 |
|
378
|
0 |
0 |
0 |
1 <= $zone and $zone <= 32767 |
|
410
|
0 |
0 |
0 |
lc $ext eq 'pnt' and -d $full_name_fs |
|
509
|
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') |
|
545
|
0 |
0 |
0 |
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}{'busy'} |
|
|
0 |
0 |
0 |
exists $self->{'scanned'}{$addr->domain} and exists $self->{'scanned'}{$addr->domain}{$addr->zone} |
|
566
|
0 |
4 |
6 |
$domain eq $self->{'domain'} and $zone == $self->{'zone'} |
|
571
|
0 |
10 |
0 |
exists $self->{'scanned'}{$domain} and exists $self->{'scanned'}{$domain}{$zone} |
|
|
0 |
10 |
0 |
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};}) |
|
640
|
0 |
9 |
0 |
exists $self->{'scanned'}{$domain}{$zone}{$_}{$net} && exists $self->{'scanned'}{$domain}{$zone}{$_}{$net}{$node} && exists $self->{'scanned'}{$domain}{$zone}{$_}{$net}{$node}{'points_dir'} |
|
704
|
0 |
0 |
0 |
@_ and defined $_[0] |
|
|
0 |
0 |
0 |
@_ and defined $_[0] and 'CODE' eq ref $_[0] |
|
825
|
0 |
0 |
0 |
defined $_[0] and grep(($_[0] eq $_), @flavoured, keys %control_file_extension) |
|
854
|
0 |
0 |
0 |
defined $flavour and exists $flavour_extension{$flavour} |
|
866
|
0 |
0 |
0 |
defined $_[0] and 'CODE' eq ref $_[0] |
|
889
|
0 |
0 |
0 |
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}) |
|
986
|
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'} |