/ 
Perlgram-0.02
/ README.md

Perlgram

A comprehensive Perl module for creating Telegram bots, supporting both webhook and CLI modes.

Installation

Install via CPAN:

cpan Perlgram

Or, install manually from GitHub:

git clone https://github.com/AmiRCandy/Perlgram.git
cd Perlgram
perl Makefile.PL
make
make test
make install

Usage

CLI Mode with Custom Handlers

use Perlgram;
use Perlgram::CLI;
use JSON qw(encode_json);

my $bot = Perlgram->new(token => 'YOUR_BOT_TOKEN');
my $cli = Perlgram::CLI->new(
    bot => $bot,
    handlers => {
        message => sub {
            my ($self, $message) = @_;
            my $chat_id = $message->{chat}{id};
            my $text = $message->{text} || '';
            $self->{bot}->sendMessage(
                chat_id => $chat_id,
                text => "You said: $text",
            );
        },
        callback_query => sub {
            my ($self, $callback_query) = @_;
            my $query_id = $callback_query->{id};
            $self->{bot}->answerCallbackQuery(
                callback_query_id => $query_id,
                text => 'Button clicked!',
            );
        },
    },
);
$cli->run();

Webhook Mode

Create config.conf:

{ token => 'YOUR_BOT_TOKEN' }

Run the webhook server:

perl bin/telegram-bot-webhook.pl daemon

Set the webhook:

use Perlgram;
my $bot = Perlgram->new(token => 'YOUR_BOT_TOKEN');
$bot->setWebhook(url => 'https://yourdomain.com/webhook/YOUR_BOT_TOKEN');

Example

Run the example CLI bot with custom handlers:

export TELEGRAM_BOT_TOKEN='YOUR_BOT_TOKEN'
perl examples/simple_bot.pl

Features

Requirements

Testing

Run tests:

make test

For full API tests, set environment variables:

export TELEGRAM_TEST_TOKEN='YOUR_TEST_TOKEN'
export TELEGRAM_TEST_CHAT_ID='YOUR_CHAT_ID'
prove -r t/

Contributing

Contributions are welcome! Please submit pull requests or issues to the GitHub repository: https://github.com/AmiRCandy/Perlgram

Author

AmiRCandy, amirhosen.1385.cmo@gmail.com

License

This module is licensed under the Artistic License 2.0. See the LICENSE file for details.

See Also