| line | % | coverage | branch |
| 19 | 50 | T | F | if @_ % 2 |
| 21 | 100 | T | F | unless ref $self->{'connect'} eq 'HASH' and $self->{'connect'}{'server'} |
| 42 | 50 | T | F | ref $self->{'plugins'} eq 'ARRAY' ? : |
| 100 | T | F | if $self->{'plugins'} |
| 53 | 50 | T | F | $self->{'connect'}{'ssl'} ? : |
| 50 | T | F | unless $self->{'socket'} = ($self->{'connect'}{'ssl'} ? 'IO::Socket::SSL' : 'IO::Socket::INET')->new('PeerAddr', $self->{'connect'}{'server'}, 'PeerPort', $self->{'connect'}{'port'}, 'Proto', 'tcp', 'Type', 1, 'SSL_verify_mode', 0) |
| 67 | 50 | T | F | if $@ |
| 92 | 0 | T | F | unless ref $_->{'timing'} and $time % 60 == 0 and $_->{'timing'}->match($time) |
| 101 | 0 | T | F | unless ($session->{'established'}) |
| 102 | 0 | T | F | if (not $session->{'user'}) { } |
| 0 | T | F | elsif ($line =~ /^:\S+\s433\s/) { } |
| 0 | T | F | elsif ($line =~ /^:\S+\s001\s/) { } |
| 113 | 0 | T | F | if @{$self->{'ticks'};} |
| 126 | 0 | T | F | if ($line =~ /^>>>\sNICK\s(.*)/) { } |
| 0 | T | F | elsif ($line =~ /^:\S+\s433\s/) { } |
| 139 | 0 | T | F | if ($line =~ /^:(\S+?)!~?(\S+?)@(\S+?)\s(\S+)\s(\S+)\s:(.*)/) { } |
| 0 | T | F | elsif ($line =~ /^:(\S+?)!~?(\S+?)@(\S+?)\s(\S+)\s:(.*)/) { } |
| 0 | T | F | elsif ($line =~ /^:(\S+?)!~?(\S+?)@(\S+?)\s(\S+)\s(\S+)\s(.*)/) { } |
| 0 | T | F | elsif ($line =~ /^:(\S+?)!~?(\S+?)@(\S+?)\s(\S+)\s(\S+)/) { } |
| 0 | T | F | elsif ($line =~ /^(PING)\s(.+)/) { } |
| 0 | T | F | elsif ($line =~ /^:(\S+)\s(NOTICE|\d+)\s(\S+)\s(.*)/) { } |
| 0 | T | F | elsif ($line =~ /^(ERROR)\s/) { } |
| 166 | 0 | T | F | unless $self->{'in'}{'nick'} ne $self->{'nick'} |
| 168 | 0 | T | F | if ($self->{'in'}{'command'} eq 'PRIVMSG') |
| 169 | 0 | T | F | if $self->{'in'}{'forum'} and $self->{'in'}{'forum'} eq $self->{'nick'} |
| 173 | 0 | T | F | if $self->{'in'}{'text'} =~ s/^\s*$self->{'nick'}\b\W*//i or $self->{'in'}{'private'} |
| 176 | 0 | T | F | if ($self->{'in'}{'to_me'}) |
| 177 | 0 | T | F | if ($self->{'in'}{'text'} =~ /^\s*help\W*$/i) { } |
| 0 | T | F | elsif ($self->{'in'}{'text'} =~ /^\s*help\s+(.+?)\W*$/i) { } |
| 181 | 0 | T | F | $self->{'in'}{'private'} ? : |
| 188 | 0 | T | F | $self->{'in'}{'private'} ? : |
| 205 | 0 | T | F | unless ref $hook->{'when'}{$type} eq 'Regexp' and $self->{'in'}{$type} =~ /$hook->{'when'}{$type}/ or ref $hook->{'when'}{$type} eq 'CODE' and $hook->{'when'}{$type}->($self, $self->{'in'}{$type}, {%{$self->{'in'};}}) or $self->{'in'}{$type} eq $hook->{'when'}{$type} |
| 208 | 0 | T | F | if keys %+ |
| 213 | 0 | T | F | if $hook->{'code'}->($self, {%{$self->{'in'};}}, $captured_matches) |
| 224 | 50 | T | F | if (not ref $plugin) { } |
| 233 | 100 | T | F | if (not $@) { } |
| 238 | 50 | T | F | unless $@ =~ /^Can't locate/ |
| 241 | 100 | T | F | unless $namespace |
| 243 | 50 | T | F | if $self->{'loaded'}{$namespace} |
| 245 | 50 | T | F | if $namespace->can('import') |
| 246 | 50 | T | F | unless $namespace->can('init') |
| 249 | 50 | T | F | if $@ |
| 286 | 50 | T | F | if ref $attr->{'subs'} eq 'HASH' |
| 287 | 50 | T | F | if ref $attr->{'helps'} eq 'HASH' |
| 307 | 50 | T | F | $timing =~ /^\d+$/ ? : |
| 340 | 50 | T | F | if ($self->{'in'}{'forum'}) { } |
| 342 | 0 | T | F | $self->{'in'}{'forum'} eq $self->{'nick'} ? : |
| 371 | 50 | T | F | if ($nick) |
| 383 | 0 | T | F | $self->can('store') ? : |
| 385 | 0 | T | F | if (not @_) { } |
| 386 | 0 | T | F | if (@join) { } |
| 0 | T | F | elsif ($self->{'connect'}{'join'}) { } |
| 390 | 0 | T | F | ref $self->{'connect'}{'join'} eq 'ARRAY' ? : |
| 407 | 0 | T | F | if $self->can('store') |
| 415 | 0 | T | F | $self->can('store') ? : |
| 422 | 0 | T | F | if $self->can('store') |