Condition Coverage

blib/lib/POE/Component/IRC.pm
Criterion Covered Total %
condition 50 135 37.0


and 3 conditions

line !l l&&!r l&&r condition
159 0 0 206 ref $args eq "HASH" and keys %{$args;}
175 205 1 0 $self->{'useipv6'} and not $GOT_SOCKET6
179 206 0 0 $self->{'usessl'} and not $GOT_SSL
358 91 0 0 $GOT_SSL and $self->{'usessl'}
362 0 0 0 $self->{'sslkey'} and $self->{'sslcert'}
567 5 4 0 $state eq "whois" and @args > 1
5 4 0 $state eq "part" and @args > 1
605 0 92 0 $self->{'resolver'} and $self->{'res_addresses'}
92 0 0 $self->{'resolver'} and $self->{'res_addresses'} and @{$self->{'res_addresses'};}
612 0 92 0 $self->{'resolver'} and not _ip_get_version($self->{'server'})
92 0 0 $self->{'resolver'} and not _ip_get_version($self->{'server'}) and not $self->{'nodns'}
617 0 0 0 $self->{'useipv6'} && $GOT_SOCKET6
650 92 0 0 $self->{'socks_proxy'} and not $self->{'socks_port'}
655 368 91 1 $self->{$address} and _ip_is_ipv6($self->{$address})
698 0 0 0 not @{$self->{'res_addresses'};} and $type eq "AAAA"
723 0 0 27 defined $to and defined $message
769 0 0 6 defined $chan and defined $nick
784 0 0 0 defined $chan and defined $nick
801 0 0 0 defined $version and $version =~ /ratbox/i
863 0 0 115 not $params{'nodns'} and $GOT_CLIENT_DNS
0 1 114 not $params{'nodns'} and $GOT_CLIENT_DNS and not $self->{'resolver'}
962 0 0 1 defined $one and defined $two
984 0 0 93 defined $to and defined $msg
1033 0 1 114 $self->{'resolver'} and $self->{'mydns'}
1092 1026 14 0 not $self->{'flood'} and @{$self->{'send_queue'};}
1026 10 4 not $self->{'flood'} and $self->{'send_time'} - $now >= 10
1094 0 0 0 $i and $priority < $self->{'send_queue'}[$i - 1][0]
1124 93 2 4 @{$self->{'send_queue'};} and $self->{'send_time'} - $now < 10
1222 0 0 0 defined $self->{'send_queue'} and ref $self->{'send_queue'} eq "ARRAY"
1395 1 0 91 not $ip =~ /:/ and _ip_is_ipv4($ip)
1413 91 0 0 $ip =~ /^(\d+)$/ and $1 < 256

or 2 conditions

line l !l condition
198 0 0 $ENV{'IRCNICK'} || eval { do { scalar getpwuid $> } } || $ENV{'USER'} || $ENV{'LOGNAME'} || 'WankerBot'
203 0 0 eval { do { scalar getpwuid $> } } || $ENV{'USER'} || $ENV{'LOGNAME'} || 'foolio'
207 115 0 $ENV{'IRCNAME'} || eval { do { (getpwuid $>)[6] } } || 'Just Another Perl Hacker'
344 0 0 $self->{'socks_id'} || ''
350 0 0 $self->{'socks_id'} || ''
1369 90 0 $isupport->isupport('CHANTYPES') || ['#', '&']

or 3 conditions

line l !l&&r !l&&!r condition
211 93 113 0 defined $self->{'server'} or $spawned
444 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)$/
574 0 0 0 $args[-1] =~ / +/ or not $args[-1] =~ /^[$chantypes]/
671 0 92 0 $self->{'socks_proxy'} || $self->{'proxy'} || $self->{'resolved_server'} || $self->{'server'}
0 92 0 $self->{'socks_port'} || $self->{'proxyport'} || $self->{'port'}
1092 4 1 1035 not $self->{'flood'} and $self->{'send_time'} - $now >= 10 or not defined $self->{'socket'}
1419 0 0 91 $n <= 0 or $n > 4
1426 0 0 364 $quad < 0 or $quad >= 256
1437 91 0 2 $n <= 0 or $n >= 8