Bot-Telegram
view release on metacpan or search on metacpan
t/lib/Bot/Telegram/Test.pm view on Meta::CPAN
242526272829303132333435363738394041424344my
@UPDATES
=
qw/message edited_message edited_channel_post callback_query/
;
sub
timer(&$) { Mojo::IOLoop -> timer(
pop
,
pop
) }
## no critic
sub
loop_for_a_second {
timer { Mojo::IOLoop -> stop } 1;
Mojo::IOLoop -> start;
}
sub
update {
my
(
$type
,
$id
) =
@_
;
return
{
$type
=> {
foo
=>
'bar'
,
baz
=>
'qux'
,
},
update_id
=>
$id
,
};
( run in 0.363 second using v1.01-cache-2.11-cpan-00829025b61 )