# NAME

Bluesky::Poster - Simple interface for posting to Bluesky (AT Protocol)

# SYNOPSIS

    use Bluesky::Poster;

    my $poster = Bluesky::Poster->new(
            identifier     => 'your-identifier.bsky.social',
            password => 'abcd-efgh-ijkl-mnop',
    );

    my $result = $poster->post("Hello from Perl!");
    print "Post URI: $result->{uri}\n";

# DESCRIPTION

I've all but given up with X/Twitter.
It's API is overly complex and no longer freely available,
so I'm trying Bluesky.

This module authenticates with Bluesky using app passwords and posts text
messages using the AT Protocol API.

# METHODS

## new(identifier => ..., password => ...)

Constructs a new poster object and logs in.
The indentifier and password can also be read in from a configuration file,
as per [Object::Configure](https://metacpan.org/pod/Object%3A%3AConfigure).

## post($text)

Posts the given text to your Bluesky feed.

# AUTHOR

Nigel Horne, with some help from ChatGPT

# SUPPORT

This module is provided as-is without any warranty.

# LICENSE

This is free software; you can redistribute it and/or modify it under
the same terms as Perl itself.