blib/lib/Bot/ChatBots/Auth.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 12 | 15 | 80.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
29 | 3 | 2 | 1 | scalar keys %{$$users{'whitelist'};} and not exists $users->{'whitelist'}{$id} |
47 | 1 | 1 | 1 | scalar keys %{$$channels{'whitelist'};} and not exists $channels->{'whitelist'}{$id} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
21 | 7 | 2 | 0 | $record->{'sender'}{'id'} // do { $Bot::ChatBots::Auth::log->info("${name}: sender id is not present"); return } |
39 | 0 | 4 | 1 | $record->{'channel'}{'fqid'} // $record->{'channel'}{'id'} |
4 | 1 | 0 | ($record->{'channel'}{'fqid'} // $record->{'channel'}{'id'}) // do { $Bot::ChatBots::Auth::log->info("${name}: chat id is not present"); return } |