print "Connecting to Mastodon...\n";
my $client = Mastodon::Client->new(
    instance        => $config->{server},
    name            => 'TotallyLegitBot',
    client_id       => $config->{key},
    client_secret   => $config->{secret},
    access_token    => $config->{token},
    coerce_entities => 1,
);

print "Posting message...\n";
$client->post_status('Dear Sir! I am prince Bob of Nigeria and i have an offer for you...');