| blib/lib/Mojo/IRC.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 18 | 36 | 50.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 53 | 1 | 2 | 1 | $old and $old eq $server |
| line | l | !l | condition |
|---|---|---|---|
| 10 | 0 | 22 | $ENV{'MOJO_IRC_DEBUG'} || 0 |
| 49 | 24 | 1 | $self->{'server'} || '' |
| 82 | 0 | 0 | $tls->{'cert'} || '/root/.cpan/build/Mojo-IRC-0.45-0/blib/lib/Mojo/mojo-irc-client.crt' |
| 83 | 0 | 0 | $tls->{'key'} || '/root/.cpan/build/Mojo-IRC-0.45-0/blib/lib/Mojo/mojo-irc-client.key' |
| 87 | 19 | 1 | $port ||= 6667 |
| 189 | 0 | 0 | $self->{'track_any'} || 0 |
| 237 | 8 | 0 | ($message->{'prefix'} =~ /^[~&\@%+]?(.*?)!/)[0] || '' |
| 268 | 37 | 12 | $v || 1 |
| 283 | 0 | 2 | $self->{'ping_pong_interval'} || 60 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 11 | 0 | 22 | 0 | $ENV{'MOJO_IRC_CERT_FILE'} || catfile(dirname('/root/.cpan/build/Mojo-IRC-0.45-0/blib/lib/Mojo/IRC.pm'), 'mojo-irc-client.crt') |
| 12 | 0 | 22 | 0 | $ENV{'MOJO_IRC_KEY_FILE'} || catfile(dirname('/root/.cpan/build/Mojo-IRC-0.45-0/blib/lib/Mojo/IRC.pm'), 'mojo-irc-client.key') |
| 89 | 3 | 17 | 0 | $self->{'debug_key'} ||= "${host}:$port" |
| 283 | 0 | 2 | 0 | $self->{'ping_tid'} ||= $self->ioloop->recurring($self->{'ping_pong_interval'} || 60, sub { $self->write('PING', $self->real_host); } ) |
| 338 | 81 | 0 | 0 | $NUMERIC2NAME{$cmd} || IRC::Utils::numeric_to_name($cmd) || $cmd |