view release on metacpan or  search on metacpan

examples/basic.pl  view on Meta::CPAN

use warnings;
use 5.010;

use FindBin;
use lib "$FindBin::Bin/../lib";

use AI::Anthropic;

# Create client with your API key
my $claude = AI::Anthropic->new(
    api_key => 'sk-ant-api03-your-key-here',  # <-- PUT YOUR KEY HERE
);

say "=" x 50;
say "AI::Anthropic Example";
say "=" x 50;

# Example 1: Simple message
say "\n1. Simple message:";
say "-" x 30;