| blib/lib/Bot/BasicBot.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 42 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 238 | 0 | 0 | 0 | $args->{'channel'} ne 'msg' and defined $args->{'address'} |
| 245 | 0 | 0 | 0 | defined $who and defined $body |
| 265 | 0 | 0 | 0 | defined $args->{'irc_command'} && $args->{'irc_command'} eq 'notice' |
| 713 | 0 | 0 | 0 | $mess->{'address'} and $mess->{'body'} =~ /^help/i |
| 728 | 0 | 0 | 0 | not ref $return and length $return |
| line | l | !l | condition |
|---|---|---|---|
| 141 | 0 | 0 | shift() || 5 |
| 160 | 0 | 0 | $args->{'handler'} || '_fork_said' |
| 161 | 0 | 0 | $args->{'arguments'} || [] |
| 372 | 0 | 0 | $irc->is_channel_operator($channel, $_) || 0 |
| 0 | 0 | $irc->has_channel_voice($channel, $_) || 0 | |
| 383 | 0 | 0 | $self->{'server'} || 'irc.perl.org' |
| 389 | 0 | 0 | $self->{'port'} || '6667' |
| 395 | 0 | 0 | $self->{'password'} || undef |
| 401 | 0 | 0 | $self->{'ssl'} || 0 |
| 407 | 0 | 0 | $self->{'localaddr'} || 0 |
| 413 | 0 | 0 | $self->{'useipv6'} || 0 |
| 904 | 0 | 0 | shift() || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 165 | 0 | 0 | 0 | $args->{'callback'} || $self |