| line |
true |
false |
branch |
|
31
|
0 |
0 |
unless (defined $$self{'Password'}) |
|
34
|
0 |
0 |
unless (defined $$self{'Listen_port'}) |
|
61
|
0 |
0 |
unless ($$self{'registered'}) |
|
86
|
0 |
0 |
unless $$self{'registered'} |
|
100
|
0 |
0 |
unless defined $$self{'filter'} |
|
115
|
0 |
0 |
if (defined $$self{'SSL_key'} and defined $$self{'SSL_cert'}) |
|
121
|
0 |
0 |
if $@ |
|
125
|
0 |
0 |
if $@ |
|
147
|
0 |
0 |
if ($$input{'command'} =~ /(PASS)/) { } |
|
|
0 |
0 |
elsif ($$input{'command'} =~ /(NICK|USER)/) { } |
|
155
|
0 |
0 |
if ($$info{'registered'} == 2) |
|
156
|
0 |
0 |
unless defined $$info{'pass'} |
|
158
|
0 |
0 |
if length $$self{'Password'} == 32 |
|
159
|
0 |
0 |
unless $$info{'pass'} eq $$self{'Password'} |
|
160
|
0 |
0 |
unless my $irc = $$self{'net2irc'}{$$info{'nick'}} |