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 |