Condition Coverage

blib/lib/POE/Component/IRC.pm
Criterion Covered Total %
condition 46 135 34.0


and 3 conditions

line !l l&&!r l&&r condition
160 0 0 205 ref $args eq 'HASH' and keys %{$args;}
176 205 0 0 $self->{'useipv6'} and not $GOT_SOCKET6
180 205 0 0 $self->{'usessl'} and not $GOT_SSL
359 90 0 0 $GOT_SSL and $self->{'usessl'}
363 0 0 0 $self->{'sslkey'} and $self->{'sslcert'}
568 5 4 0 $state eq 'whois' and @args > 1
5 4 0 $state eq 'part' and @args > 1
606 0 91 0 $self->{'resolver'} and $self->{'res_addresses'}
91 0 0 $self->{'resolver'} and $self->{'res_addresses'} and @{$self->{'res_addresses'};}
613 0 91 0 $self->{'resolver'} and not _ip_get_version($self->{'server'})
91 0 0 $self->{'resolver'} and not _ip_get_version($self->{'server'}) and not $self->{'nodns'}
618 0 0 0 $self->{'useipv6'} && $GOT_SOCKET6
651 91 0 0 $self->{'socks_proxy'} and not $self->{'socks_port'}
656 364 91 0 $self->{$address} and _ip_is_ipv6($self->{$address})
699 0 0 0 not @{$self->{'res_addresses'};} and $type eq 'AAAA'
724 0 0 27 defined $to and defined $message
770 0 0 6 defined $chan and defined $nick
785 0 0 0 defined $chan and defined $nick
802 0 0 0 defined $version and $version =~ /ratbox/i
864 0 0 115 not $params{'nodns'} and $GOT_CLIENT_DNS
0 1 114 not $params{'nodns'} and $GOT_CLIENT_DNS and not $self->{'resolver'}
963 0 0 1 defined $one and defined $two
985 0 0 93 defined $to and defined $msg
1034 0 1 114 $self->{'resolver'} and $self->{'mydns'}
1093 1025 7 0 not $self->{'flood'} and @{$self->{'send_queue'};}
1025 5 2 not $self->{'flood'} and $self->{'send_time'} - $now >= 10
1095 0 0 0 $i and $priority < $self->{'send_queue'}[$i - 1][0]
1125 91 1 2 @{$self->{'send_queue'};} and $self->{'send_time'} - $now < 10
1223 0 0 0 defined $self->{'send_queue'} and ref $self->{'send_queue'} eq 'ARRAY'
1396 0 0 91 not $ip =~ /:/ and _ip_is_ipv4($ip)
1414 91 0 0 $ip =~ /^(\d+)$/ and $1 < 256

or 2 conditions

line l !l condition
199 0 0 $ENV{'IRCNICK'} || eval { do { scalar getpwuid $> } } || $ENV{'USER'} || $ENV{'LOGNAME'} || 'WankerBot'
204 0 0 eval { do { scalar getpwuid $> } } || $ENV{'USER'} || $ENV{'LOGNAME'} || 'foolio'
208 115 0 $ENV{'IRCNAME'} || eval { do { (getpwuid $>)[6] } } || 'Just Another Perl Hacker'
345 0 0 $self->{'socks_id'} || ''
351 0 0 $self->{'socks_id'} || ''
1370 90 0 $isupport->isupport('CHANTYPES') || ['#', '&']

or 3 conditions

line l !l&&r !l&&!r condition
212 92 113 0 defined $self->{'server'} or $spawned
445 0 0 0 @resp != 4 or $resp[0] ne '0'
0 0 0 @resp != 4 or $resp[0] ne '0' or not $resp[1] =~ /^(?:90|91|92|93)$/
575 0 0 0 $args[-1] =~ / +/ or not $args[-1] =~ /^[$chantypes]/
672 0 91 0 $self->{'socks_proxy'} || $self->{'proxy'} || $self->{'resolved_server'} || $self->{'server'}
0 91 0 $self->{'socks_port'} || $self->{'proxyport'} || $self->{'port'}
1093 2 1 1029 not $self->{'flood'} and $self->{'send_time'} - $now >= 10 or not defined $self->{'socket'}
1420 0 0 91 $n <= 0 or $n > 4
1427 0 0 364 $quad < 0 or $quad >= 256
1438 91 0 0 $n <= 0 or $n >= 8