Help for this page

Select Code to Download

Select or download this

$VAR1 = [
          {
            'mentions' => [],
...
        ];

Not a HASH reference at discord.pl line 70.

Select or download this

sub getMessages($) {
    my $apiUrl = $baseUrl . "channels/" . $_[0] . "/messages?limit=1";
    print "$apiUrl\n";
...
sub errorCon {
    print "Error: Unable to connect to Discord!\n";
}