| line |
true |
false |
branch |
|
45
|
1 |
1 |
unless ($file)
|
|
|
0 |
63 |
unless ($file)
|
|
62
|
0 |
5 |
unless defined $body
|
|
|
244 |
27 |
unless defined $body
|
|
63
|
0 |
5 |
unless $self->_load_notification_file
|
|
|
0 |
27 |
unless $self->_load_notification_file
|
|
64
|
0 |
5 |
if $body =~ m[^\s*/?who(is|was)?\s+]
|
|
|
0 |
27 |
if $body =~ m[^\s*/?who(is|was)?\s+]
|
|
81
|
0 |
9 |
if $word =~ /(\-\-|\+\+)$/
|
|
|
0 |
27 |
if $word =~ /(\-\-|\+\+)$/
|
|
82
|
0 |
9 |
if $prev eq 'seen'
|
|
86
|
9 |
0 |
if ($word =~ /\@?(\w+)/)
|
|
91
|
0 |
1 |
if $nick and $users{$nick}
|
|
93
|
2 |
7 |
if ($word eq '@all') { }
|
|
|
1 |
6 |
elsif ($word eq '@here') { }
|
|
|
1 |
5 |
elsif ($nick and $emails{$nick}) { }
|
|
107
|
1 |
1 |
if &any(sub {
$_ == 1;
}
, values %users)
|
|
131
|
6 |
8 |
unless $nick
|
|
137
|
8 |
0 |
if ($channel{$user})
|
|
139
|
0 |
0 |
if ($seen and $seen->{'time'})
|
|
141
|
0 |
0 |
if $time < $settings{'active'} * 60
|
|
142
|
0 |
0 |
if $time > 3600 and $type == 2
|
|
157
|
0 |
1 |
unless my $fn = $self->store->get('notify', 'notifications')
|
|
158
|
0 |
1 |
unless -r $fn
|
|
161
|
0 |
1 |
if $mod <= $load_time and keys %emails
|
|
163
|
0 |
1 |
unless my $fh = 'IO::File'->new($fn, 'r')
|
|
167
|
0 |
4 |
if /^#/ or /^$/
|
|
170
|
1 |
3 |
if ($nick eq 'CONFIG')
|
|
176
|
3 |
0 |
if $ident
|
|
186
|
0 |
1 |
unless $settings{'smtp'}
|
|
187
|
1 |
0 |
if keys %emails
|
|
195
|
0 |
5 |
if $emails{$user}
|
|
199
|
0 |
5 |
unless $emails{$ident}{'ident'}
|
|
202
|
4 |
1 |
unless $user eq $nick
|
|
204
|
0 |
1 |
if $nicks->{$nick}{'Real'} =~ /\Q$emails{$ident}{'ident'}\E/
|
|
205
|
0 |
4 |
if $nicks->{$nick}{'User'} =~ /\Q$emails{$ident}{'ident'}\E/
|
|
206
|
1 |
3 |
if $nicks->{$nick}{'Userhost'} =~ /\Q$emails{$ident}{'ident'}\E/
|
|
228
|
18 |
18 |
if ($@)
|