Size: a a a

2021 June 28

VG

Vadim Goncharov in Modern::Perl
ссылка не работает
источник

AF

Alexandre Frolov in Modern::Perl
Когда делаю:

$rc=$api->sendMessage ({
           chat_id => $chat_id,
           parse_mode => "HTML",
     text => '<b>Выберите нужное</b> на клавиатуре или перейдите на <a href="https://www.shop.ru/">сайт</a>',

     reply_markup => { inline_keyboard => [[{text => "hello", callback_data => "world"}]] }
});

то

[2021-06-28 15:35:42.40520] [29120] [error] [HwJs8MiOXfhK] ERROR: code 400: Bad Request: chat not found at /usr/local/share/perl/5.28.1/WWW/Telegram/BotAPI.pm line 224.
источник

AF

Alexandre Frolov in Modern::Perl
и  тому же это инлайн кнопка получается, а не внизу окна
источник

SZ

Sergey Zhmylove in Modern::Perl
Ты шутишь?
источник

SZ

Sergey Zhmylove in Modern::Perl
Вот это видел?
источник

AF

Alexandre Frolov in Modern::Perl
нет, реально не понимаю что происходит
источник

SZ

Sergey Zhmylove in Modern::Perl
Callback data есть только у inline
источник

AF

Alexandre Frolov in Modern::Perl
Тогда получается что нельзя сделать кнопки внизу, чтобы текст отличался от привязанных команд? Видел много таких примеров на разных языках, но на Perl ytn
источник

SZ

Sergey Zhmylove in Modern::Perl
"chat not found" тебе ни о чем не говорит, кстати?
источник

AF

Alexandre Frolov in Modern::Perl
так вот я и не понимаю
источник

AF

Alexandre Frolov in Modern::Perl
my $rc = $api->SendMessage(
 {
    chat_id => $chat_id,
    reply_to_message_id => $reply_to_message_id,
    text => $text
 } );
источник

AF

Alexandre Frolov in Modern::Perl
вот тут chat_id есть
источник

AF

Alexandre Frolov in Modern::Perl
видимо я вообще не понимаю, как обрабатывать события от этих кнопок
источник

SZ

Sergey Zhmylove in Modern::Perl
А ты не забывай дамп абсолютно всех входящих сообщений делать в stderr и сразу станет всё ясно
источник

AF

Alexandre Frolov in Modern::Perl
Делаю так, не ясно(

post '/' => sub ($c) {
 my $data = $c->req->json;
 my $datad=Dumper($data);
 $c->app->log->info($datad);
источник

SZ

Sergey Zhmylove in Modern::Perl
Смотри: callback -- это опция inline кнопок, которым можно указать callback data, который будет отправляться в бот как коллбек.
Я предполагаю, что sendMessage ты делаешь абсолютно на все сообщения, причем $chat_id = message-chat-id, так?
источник

SZ

Sergey Zhmylove in Modern::Perl
Если да, тогда ты должен понимать, что в callbackquery нету chat
источник

SZ

Sergey Zhmylove in Modern::Perl
И тогда chat id пустой
источник

SZ

Sergey Zhmylove in Modern::Perl
И тогда 400 chat not found
источник

AF

Alexandre Frolov in Modern::Perl
Да, я так и делаю. А как мне нужно поступить?
источник