AnyEvent::Discord - Provides an AnyEvent interface to the Discord bot API
use AnyEvent::Discord; my $client = AnyEvent::Discord->new({ token => 'mydiscordbottoken' }); $client->on('ready', sub { warn 'Connected'; }); $client->on('message_create', sub { my ($client, $data) = @_; warn '[' . $client->channels->{$data->{channel_id}} . ']' . '(' . $data->{author}->{username} . ') - ' . $data->{content}; }); $client->connect(); AnyEvent->condvar->recv;
This module provides an AnyEvent interface for the Discord API over the REST and WebSocket APIs. It is designed to be somewhat similar to the SlackRTM and XMPP modules, with a subset of their far more mature functionality.
To get started, one needs to create a new application in the Discord Developer Portal (https://discord.com/developers). Once an application is created, a token can be captured by navigating to the "Bot" tab on the left side and selecting 'Click to Reveal Token'. That generated token is the same token required by this module.
The token generated by the Discord Application portal, under Bot.
The base URI for communicating with the Discord API.
Used to override options to sent to AnyEvent::WebSocket::Client, if needed.
Verbose output, writes internal debug information at 1, additionally writes network conversation at 2.
Available/created/seen guilds, as a hashmap of id => name
Available/created/seen channels, as a hashmap of id => name
Available/created/seen users, as a hashmap of id => name
Instantiate the AnyEvent::Discord client. The hashref of arguments matches the configuration accessors listed above. A common invocation looks like:
my $client = AnyEvent::Discord->new({ token => 'ABCDEF' });
Attach an event handler to a defined event type. If an invalid event type is specified, no error will occur -- this is mostly to be able to handle events that are created after this module is published. This is an append method, so calling on() for an event multiple times will call each callback assigned. If the handler already exists for an event, no error will be returned, but the handler will not be called twice.
Discord event types: https://discord.com/developers/docs/topics/gateway#list-of-intents
Opcodes: https://discord.com/developers/docs/topics/opcodes-and-status-codes#gateway-opcodes
These events receive the parameters client, data object (d) and the opcode (op).
sub event_responder { my ($client, $data, $opcode) = @_; return; }
Internal event types:
Receives no parameters, just notifies a disconnection will occur. It will auto reconnect.
Receives an error message as a parameter, allows internal handling of errors that are not a hard failure.
Detach an event handler from a defined event type. If the handler does not exist for the event, no error will be returned. If no handler is provided, all handlers for the event type will be removed.
Start connecting to the Discord API and return immediately. In a new AnyEvent application, this would come before executing "AnyEvent->condvar->recv". This method will retrieve the available gateway endpoint, create a connection, identify itself, begin a heartbeat, and once complete, Discord will fire a 'ready' event to the handler.
Send a message to the provided channel.
Starts the "typing..." indicator in the provided channel. This method issues the typing request, and starts a timer on the caller's behalf to keep the indicator active. Returns an instance of that timer to allow the caller to undef it when the typing indicator should be stopped.
my $instance = $client->typing($channel); # ... perform some actions $instance = undef; # typing indicator disappears
Close the connection to the server.
This is incredibly unfinished.
Nick Melnick <nmelnick@cpan.org>
This software is copyright (c) 2021, Nick Melnick.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
To install AnyEvent::Discord, copy and paste the appropriate command in to your terminal.
cpanm
cpanm AnyEvent::Discord
CPAN shell
perl -MCPAN -e shell install AnyEvent::Discord
For more information on module installation, please visit the detailed CPAN module installation guide.