blib/lib/Mojo/IRC.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 18 | 36 | 50.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
54 | 1 | 2 | 1 | $old and $old eq $server |
line | l | !l | condition |
---|---|---|---|
11 | 0 | 11 | $ENV{'MOJO_IRC_DEBUG'} || 0 |
50 | 14 | 1 | $self->{'server'} || '' |
83 | 0 | 0 | $tls->{'cert'} || '/root/.cpan/build/Mojo-IRC-0.46-0/blib/lib/Mojo/mojo-irc-client.crt' |
84 | 0 | 0 | $tls->{'key'} || '/root/.cpan/build/Mojo-IRC-0.46-0/blib/lib/Mojo/mojo-irc-client.key' |
89 | 9 | 1 | $port ||= 6667 |
187 | 0 | 0 | $self->{'track_any'} || 0 |
242 | 7 | 0 | ($message->{'prefix'} =~ /^[~&\@%+]?(.*?)!/u)[0] || '' |
273 | 19 | 3 | $v || 1 |
288 | 0 | 2 | $self->{'ping_pong_interval'} || 60 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
12 | 0 | 11 | 0 | $ENV{'MOJO_IRC_CERT_FILE'} || catfile(dirname('/root/.cpan/build/Mojo-IRC-0.46-0/blib/lib/Mojo/IRC.pm'), 'mojo-irc-client.crt') |
13 | 0 | 11 | 0 | $ENV{'MOJO_IRC_KEY_FILE'} || catfile(dirname('/root/.cpan/build/Mojo-IRC-0.46-0/blib/lib/Mojo/IRC.pm'), 'mojo-irc-client.key') |
91 | 3 | 7 | 0 | $self->{'debug_key'} ||= "${host}:$port" |
288 | 0 | 2 | 0 | $self->{'ping_tid'} ||= $self->ioloop->recurring($self->{'ping_pong_interval'} || 60, sub { $self->write('PING', $self->real_host); } ) |
343 | 39 | 0 | 0 | $NUMERIC2NAME{$cmd} || IRC::Utils::numeric_to_name($cmd) || $cmd |