NAME
Pcore::API::Telegram::Bot
SYNOPSIS
use Pcore::API::Telegram::Bot;
my $bot = Pcore::API::Telegram::Bot->new( key => $key );
$bot->{on_message} = sub ( $bot, $msg ) {
if ( $msg->{message}->{text} eq '/' ) {
$bot->send_message( $msg->{message}->{chat}->{id}, 'вывывывыэ' );
}
return;
};
$bot->poll_updates;