| line |
true |
false |
branch |
|
50
|
4 |
0 |
if (wantarray) { } |
|
53
|
0 |
0 |
if @out == 1 |
|
64
|
0 |
4 |
if /^\+\+\+/ |
|
65
|
0 |
4 |
unless /^([A-Z]+\S*)(?:\s+(.+))?$/ |
|
81
|
0 |
4 |
if ($args{'msgtype'} =~ /^TALK|TELL$/ and /^(\S+)\s+[:>](.*)\s*$/) { } |
|
|
0 |
4 |
elsif ($args{'msgtype'} eq 'LISTINVITE' and /((\S+)\s+invites\s+you\s+to\s+(\S+)\s+To\s+respond,\s+type\s+(.+))\s*$/) { } |
|
|
0 |
4 |
elsif ($args{'msgtype'} eq 'LISTTALK' and /^(\S+)\s*%(.*)\s+{(.+?)}\s*$/) { } |
|
|
0 |
4 |
elsif ($args{'msgtype'} eq 'LISTEMOTE' and /^%\s*(\S+)\s+(.*)\s+{(.+?)}\s*$/) { } |
|
|
0 |
4 |
elsif ($args{'msgtype'} eq 'OBSERVED' and /^(\S+)\s+(\S+)\s+(\S+)\s+\@(.+)\s+{(\@.+?)}\s*$/) { } |
|
|
0 |
4 |
elsif ($args{'msgtype'} eq 'OBSERVED' and /^(\S+)\s+(\S+)\s+(?:\@\s+)(\S+)\s+(.+)\s+{(\@.+?)}\s*$/) { } |
|
|
0 |
4 |
elsif ($args{'msgtype'} eq 'OBSERVED' and /^(\S+)\s+GROUPCHANGE\s+(\S+)\s+(.*)\s*$/) { } |
|
|
0 |
4 |
elsif ($args{'msgtype'} eq 'SHOUT' and /^(\S+)\s+\!(.*)\s*$/) { } |
|
|
0 |
4 |
elsif ($args{'msgtype'} eq 'CONNECT' and /^((\S+).+\s+(\S+)\.)\s*$/) { } |
|
|
0 |
8 |
elsif ($args{'msgtype'} eq 'IDLE' and /^((\S+)(.*))\s*$/) { } |
|
164
|
0 |
0 |
unless $Parse::Colloquy::Bot::DEBUG |
|
169
|
4 |
0 |
unless $Parse::Colloquy::Bot::DEBUG |