| blib/lib/App/TeleGramma/BotAction/Listen.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 4 | 8 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 19 | 0 | 7 | if ($msg->text and not ref $cmd and $msg->text =~ /^\Q$cmd\E \b \@?/x) |
| 21 | 0 | 0 | if defined $body |
| 25 | 5 | 2 | if ($msg->text and ref $cmd eq 'Regexp' and $msg->text =~ /$cmd/) |
| 27 | 5 | 0 | if defined $body |