The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Apigee::Edge::Helper - Helpers for Apigee::Edge

SYNOPSIS

use Apigee::Edge::Helper;

my $apigee = Apigee::Edge::Helper->new(
  org => 'apigee_org',
  usr => 'your_email',
  pwd => 'your_password'
);

DESCRIPTION

it builts top on Apigee::Edge with same useful helpers.

METHODS

get_top_developer_app

my $app = $apigee->get_top_developer_app($email);

get the first app belongs to developer ($email) and flatten attrs into app

refresh_developer_app

my $app = $apigee->refresh_developer_app(
    app         => $old_app, # optional, app hashref, can be from get_top_developer_app
    email       => $client_email,
    name        => $name,
    callbackUrl => $callback_url,
    apiProducts => ['ProductName'], # optional
    firstName   => $first_name,
    lastName    => $last_name,
    userName    => $loginid,
);
warn $apigee->errstr;

when param app is provided, we'll update the $old_app to $app with name to be a DisplayName attr and callbackUrl updated..

when param app is not provided, we'll first call get_top_developer_app to find the app to update. if app is not created yet, we'll create a new developer on the fly with email/firstName/lastName/userName and created related developer_app with name/callbackUrl and apiProducts.

get_all_clients

my $clients = $apigee->get_all_clients();

with consumerKey as key and DisplayName || name as the value.

errstr

GITHUB

https://github.com/binary-com/perl-Apigee-Edge

AUTHOR

Binary.com <fayland@binary.com>

COPYRIGHT

Copyright 2014- Binary.com

LICENSE

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

SEE ALSO