PONAPI::Client(3pm)
π NAME π
okay bestie, meet PONAPI::Client β it's a Client to a {JSON:API} service (http://jsonapi.org/) v1.0. she's the girl who talks to your API so you don't have to π
β¨ VERSION β¨
version 0.002012 β yes ma'am, that's the one πΈ
π¦ SYNOPSIS π¦
here's the whole vibe, no cap:
use PONAPI::Client;
my $client = PONAPI::Client->new(
host => $host,
port => $port,
);
$client->retrieve_all( type => $type );
$client->retrieve(
type => $type,
id => $id,
);
$client->retrieve_relationships(
type => $type,
id => $id,
rel_type => $rel_type,
);
$client->retrieve_by_relationship(
type => $type,
id => $id,
rel_type => $rel_type,
);
$client->create(
type => $type,
data => {
attributes => { ... },
relationships => { ... },
},
);
$client->delete(
type => $type,
id => $id,
);
$client->update(
type => $type,
id => $id,
data => {
type => $type,
id => $id,
attributes => { ... },
relationships => { ... },
}
);
$client->delete_relationships(
type => $type,
id => $id,
rel_type => $rel_type,
data => [
{ type => $rel_type, id => $rel_id },
...
],
);
$client->create_relationships(
type => $type,
id => $id,
rel_type => $rel_type,
data => [
{ type => $rel_type, id => $rel_id },
...
],
);
$client->update_relationships(
type => $type,
id => $id,
rel_type => $rel_type,
# for a one-to-one:
data => { type => $rel_type, id => $rel_id },
# or for a one-to-many:
data => [
{ type => $rel_type, id => $rel_id },
...
],
);
# If the endpoint uses an uncommon url format:
$client->retrieve(
type => 'foo',
id => 43,
# Will generate a request to
# host:port/type_foo_id_43
uri_template => "type_{type}_id_{id}",
);
like, look at her go π«Ά
π DESCRIPTION π
so PONAPI::Client is a {JSON:API} <http://jsonapi.org/> compliant client β she should be able to talk to any API-compliant service, fr fr. main character energy, honestly π
the client does a handful of checks required by the spec, then uses Hijk to communicate with the service. that's the whole pipeline bestie.
π what you get back
in most cases, all API methods return a response document:
my $response = $client->retrieve(...);
but in list context however, all api methods will return the request status and the document:
my ($status, $response) = $client->retrieve(...)
(yeah she switches it up depending on context, iconic behavior tbh β¨)
π what the response documents look like
response documents will look something like these:
successful retrieve(type => 'articles', id => 2):
{
jsonapi => { version => "1.0" },
links => { self => "/articles/2" },
data => { ... },
meta => { ... }, # May not be there
included => [ ... ], # May not be there, see C<include>
}
successful retrieve_all( type => 'articles' ):
{
jsonapi => { version => "1.0" },
links => { self => "/articles" }, # May include pagination links
data => [
{ ... },
{ ... },
...
],
meta => { ... }, # May not be there
included => [ ... ], # May not be there, see C<include>
}
successful create(type => 'foo', data => { ... }):
{
jsonapi => { version => "1.0" },
links => { self => "/foo/$created_id" },
data => { type => 'foo', id => $created_id },
}
successful update(type => 'foo', id => 2, data => { ... }):
{
jsonapi => { version => "1.0" },
links => { self => "/foo/2" }, # may not be there
meta => { ... }, # may not be there
}
and when it all goes wrong π β error, see http://jsonapi.org/format/#error-objects:
{
jsonapi => { version => "1.0" },
errors => [
{ ... }, # error 1
... # potentially others
],
}
heads up bestie β there are situations where the server may respond with a 204 No Content and no response document. depending on the situation, it might be worth checking the status π
more coming, stay tuned π
π METHODS π
Okay bestie, this is the part you actually came for. Every single method, no skips, we're eating the whole plate. π½οΈβ¨
π¦ new
Creates a new PONAPI::Client object. It takes a couple of attributes:
hostβ the hostname (or IP address) of the service. Defaults tolocalhost. πportβ the port of the service. Defaults to5000.send_version_headerβ sends anX-PONAPI-Client-Versionheader set to the {JSON:API} version the client supports. Defaults to true. π
πΈ retrieve_all
retrieve_all( type => $type, %optional_arguments )
Retrieves all the resources of a given type. In SQL terms this is basically "SELECT * FROM $type". It's giving "give me everything, I'm not picky". π
This one handles a bunch of arguments, so let's go one by one:
π fields
Spec: <http://jsonapi.org/format/#fetching-sparse-fieldsets>
Instead of returning every attribute and relationship from a given resource, fields lets you say exactly what comes back. Sparse fieldset vibes, we love a curated moment. π
This expects a hashref of arrayrefs, where the keys are types and the values are either attribute names or relationship names.
$client->retrieve_all(
type => 'people',
fields => { people => [ 'name', 'age' ] }
)
Now here's the little plot twist β an attribute not being in fields means the opposite of an attribute having empty fields:
# No attributes or relationships for both people and comments
$client->retrieve_all(
type => 'people',
fields => { people => [], comments => [] },
);
# No attributes or relationships for comments, but
# ALL attributes and relationships for people
$client->retrieve_all(
type => 'people',
fields => { comments => [] },
);
π¦ include
Spec: <http://jsonapi.org/format/#fetching-includes>
include is how you fetch related resources. The example below is fetching both all the people and all comments made by those people. Two birds, one response. π¦π¦
my $response = $client->retrieve_all(
type => 'people',
include => ['comments']
);
include expects an arrayref of relationship names. In the response, the fetched resources land in an arrayref under the top-level included key:
say $_->{attributes}{body} for @{ $response->{included} }
π page
Spec: <http://jsonapi.org/format/#fetching-pagination>
Requests that the server paginate the results. Every endpoint may have its own different pagination rules, so no universal answer here, sorry babe. π
π sort
Spec: <http://jsonapi.org/format/#fetching-sorting>
Requests that the server sort the results in a given way:
$client->retrieve_all(
type => 'people',
sort => [qw/ age /], # sort by age, ascending
);
$client->retrieve_all(
type => 'people',
sort => [qw/ -age /], # sort by age, descending
);
Although not all endpoints will support this, it may be possible to sort by a relationship's attribute:
$client->retrieve_all(
type => 'people',
sort => [qw/ -comments.created_date /],
);
β filter
Spec: <http://jsonapi.org/format/#fetching-filtering>
This one is entirely dependent on the endpoint. It's usually employed to act as a WHERE clause:
$client->retrieve_all(
type => 'people',
filter => {
id => [ 1, 2, 3, 4, 6 ], # IN ( 1, 2, ... )
age => 34, # age = 34
},
);
Sadly, more complex filters are currently not available. It's giving "we tried our best". π
π«Ά retrieve
retrieve( type => $type, id => $id, %optional_arguments )
Similar to retrieve_all, but retrieves a single resource. One. Singular. The main character. π
π retrieve_relationships
retrieve_relationships( type => $type, id => $id, rel_type => $rel_type, %optional_arguments )
Retrieves all of $id's relationships to $rel_type as resource identifiers β that is, as hashrefs that contain only type and id:
# retrieve_relationships(type=>'people', id=>2, rel_type=>'comments')
{
jsonapi => { version => "1.0" },
data => [
{ type => 'comments', id => 4 },
{ type => 'comments', id => 9 },
{ type => 'comments', id => 14 },
]
}
These two do roughly the same thing:
my $response = $client->retrieve( type => $type, id => $id );
my $relationships = $response->{data}{relationships}{$rel_type};
say join ", ", map $_->{id}, @$relationships;
my $response = $client->retrieve_relationships(
type => $type,
id => $id,
rel_type => $rel_type,
);
my $relationships = $response->{data};
say join ", ", map $_->{id}, @$relationships;
However, retrieve_relationships also allows you to page those relationships, which may be quite useful. Lowkey the upgrade nobody talks about. π₯
Keep in mind that retrieve_relationships will return an arrayref for one-to-many relationships, and a hashref for one-to-ones. Remember that or suffer. π
β¨ retrieve_by_relationship
retrieve_by_relationship( type => $type, id => $id, rel_type => $rel_type, %optional_arguments )
retrieve_relationships on steroids. πͺ It behaves the same way, but will retrieve full resources, not just resource identifiers. Because of this, you can also potentially apply more complex filters and sorts. Go off.
π create
create( type => $type, data => { ... }, id => $optional )
Create a resource of type $type using $data to populate it. Data must include the type, and may include two other keys: attributes and relationships:
$client->create(
type => 'comments',
data => {
type => 'comments',
attributes => { body => 'abc' },
relationships => {
author => { type => 'people', id => 55 },
liked_by => [
{ type => 'people', id => 55 },
{ type => 'people', id => 577 },
],
}
}
)
An optional id may be provided, in which case the server may choose to use it when creating the new resource. (Key word: may. The server holds the power here. π)
π¦ update
update( type => $type, id => $id, data => { ... } )
Can be used to update the resource. Data must have type and id keys:
$client->create(
type => 'comments',
id => 5,
data => {
type => 'comments',
id => 5,
attributes => { body => 'new body!' },
relationships => {
author => undef, # no author
liked_by => [
{ type => 'people', id => 79 },
],
}
}
)
An empty arrayref ([]) can be used to clear one-to-many relationships, and undef to clear one-to-one relationships. Clearing the air, emotionally. π§Ήπ¨
A successful update will always return a response document; see the spec for more details.
Spec: <http://jsonapi.org/format/#crud-updating>
π delete
delete( type => $type, id => $id )
Deletes the resource. Gone. Poof. Not me being dramatic, it's literally what it does. π
πΈ update_relationships
update_relationships( type => $type, id => $id, rel_type => $rel_type, data => $data )
Update a resource's relationships. Basically a shortcut to using update. Efficient queen. π
For one-to-one relationships, data can be either a single hashref, or undef. For one-to-many relationships, data can be an arrayref; an empty arrayref means 'clear the relationship'.
β create_relationships
create_relationships( type => $type, id => $id, rel_type => $rel_type, data => [{ ... }] )
Adds to the specified one-to-many relationship. Adding, not replacing. Know the difference bestie. π
π§ delete_relationships
delete_relationships( type => $type, id => $id, rel_type => $rel_type, data => [{ ... }] )
Deletes from the specified one-to-many relationship.
π Endpoint URI format π
By default, PONAPI::Client assumes urls on the endpoint are in this format:
retrieve_all: /$type
retrieve: /$type/$id
retrieve_by_relationships: /$type/$id/$rel_type
retrieve_relationships: /$type/$id/relationships/$rel_type
create: /$type or /$type/$id
delete: /$type/$id
update: /$type/$id
update_relationships: /$type/$id/relationships/$rel_type
create_relationships: /$type/$id/relationships/$rel_type
delete_relationships: /$type/$id/relationships/$rel_type
# Will generate a request to /foo/99
$client->retrieve(
type => 'foo',
id => 99,
);
However, if another format is needed, two approaches are possible:
π URI paths have a common prefix
If all the endpoint urls have a common prefix, ala /v1/articles instead of simply /articles, then you can just set uri_base as needed:
$client->retrieve(
type => 'foo',
id => 99,
uri_base => '/v1'
);
We can also set this when creating the client; if done this way, all requests generated from this client will include the base:
my $new_client = PONAPI::Client->new(
uri_base => '/v1',
...
);
# This will generate a request to /v1/foo/99
$new_client->retrieve(
type => 'foo',
id => 99,
);
π«Ά Completely different uris
If the endpoint's expected formats are wildly different, you can specify uri_template with your request:
# Will generate a request to id_here_99_and_type_there/foo
$client->retrieve(
type => 'foo',
id => 99,
uri_template => 'id_here_{id}_and_type_there/{type}'
);
These placeholders are recognized:
typeidrel_type
This can only be done on a per-request basis. No setting it globally, that's just the rules. π
π AUTHORS π
- Mickey Nasriachi <mickey@cpan.org>
- Stevan Little <stevan@cpan.org>
- Brian Fraser <hugmeir@cpan.org>
Legends, all three of them. π«Ά
π COPYRIGHT AND LICENSE π
This software is copyright (c) 2019 by Mickey Nasriachi, Stevan Little, Brian Fraser.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
And that's a wrap on the whole page bestie!! ππ
This beauty shipped with perl v5.36.0 and was dated 2022-12-07 β vintage but still absolutely iconic, no cap. Go build something cute with it, mwah. ππβ¨
π¦ where this page comes from
- debian bookworm: libponapi-client-perl 0.002012-2 Β· Artistic-1.0-Perl OR GPL-1.0-or-later
- debian trixie: libponapi-client-perl 0.002012-2 Β· Artistic-1.0-Perl OR GPL-1.0-or-later
- ubuntu noble: libponapi-client-perl 0.002012-2 Β· Artistic-1.0-Perl OR GPL-1.0-or-later
- ubuntu resolute: libponapi-client-perl 0.002012-2 Β· Artistic-1.0-Perl OR GPL-1.0-or-later
- ubuntu stonking: libponapi-client-perl 0.002012-2 Β· Artistic-1.0-Perl OR GPL-1.0-or-later
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash on : a language model's rewrite of the original, under its terms