SYNOPSIS use v5.38; use WebService::Akeneo; use WebService::Akeneo::Config; my $cfg = WebService::Akeneo::Config->new( base_url => 'https://my-site.com', client_id => $ENV{AKENEO_CLIENT_ID}, client_secret => $ENV{AKENEO_CLIENT_SECRET}, username => $ENV{AKENEO_USER}, password => $ENV{AKENEO_PASS}, ); my $ak = WebService::Akeneo->new(config => $cfg); $ak->on_request(sub ($i){ say "--> $i->{method} $i->{url}" }); $ak->on_response(sub ($i){ say "<-- $i->{code}" }); my $res = $ak->categories->upsert_ndjson([ { code => 'smagic', parent=>'master', labels=>{ es_ES => 'Espada Magica' } }, { code => 'mixers', parent=>'master', labels=>{ es_ES => 'Batidora' } }, ]);