line |
true |
false |
branch |
30
|
0 |
1 |
unless defined $line |
32
|
0 |
1 |
if ($line =~ tr/\000\n\r\cP[]//) |
42
|
0 |
5 |
unless defined $line |
44
|
0 |
5 |
if ($line =~ tr/\cP//) |
48
|
0 |
5 |
if $line =~ tr/\cA// % 2 != 0 |
50
|
3 |
2 |
unless $line =~ tr/\cA// |
53
|
2 |
0 |
unless length $chunks[0] |
64
|
2 |
0 |
if (index($line, "\cA") == 0) |
70
|
0 |
0 |
if @chunks |
79
|
4 |
0 |
unless (blessed $input and $input->isa('IRC::Message::Object')) |
80
|
1 |
3 |
ref $input ? : |
84
|
3 |
1 |
uc $input->command eq 'PRIVMSG' ? : |
87
|
2 |
2 |
unless $unquoted and @{$$unquoted{'ctcp'};} |
92
|
0 |
2 |
unless $name |
94
|
0 |
2 |
if ($name eq 'dcc') { } |
98
|
0 |
0 |
unless $dcc_type |
99
|
0 |
0 |
$input->prefix ? : |
109
|
2 |
0 |
$input->prefix ? : |
|
2 |
0 |
defined $params ? : |