Branch Coverage

blib/lib/Bot/ChatBots/Telegram/Role/Source.pm

Criterion	Covered	Total	%
branch	5	12	41.6

line	true	false	branch
44	1	2	unless my $update = $record->{'update'}
65	2	0	if ($dtype eq 'Message') { }
	0	0	elsif ($dtype eq 'CallbackQuery') { }
69	0	0	if (exists $payload->{'message'}) { }
76	2	0	if ($chan)
77	2	0	if exists $chan->{'id'}