NAME

Net::APNs::HTTP2 - APNs Provider API for Perl

SYNOPSIS

use Net::APNs::HTTP2;

my $apns = Net::APNs::HTTP2->new(
    is_development => 1,
    auth_key       => 'auth_key.p8',
    key_id         => $key_id,
    team_id        => $team_id,
    bundle_id      => $bundle_id,
);

while (1) {
    $apns->prepare($device_token, {
        aps => {
            alert => 'some message',
            badge => 1,
        },
    }, sub {
        my ($header, $content) = @_;
        # $header = [
        #     ":status" => "200",
        #     "apns-id" => "82B34E17-370A-DBF4-5046-FF56A4EA1FAF",
        # ];
        ...
    });

    # You can chainged
    $apns->prepare(...)->prepare(...)->prepare(...);

    # send all prepared requests in parallel
    $apns->send;

    # do something
}

# must call `close` when finished
$apns->close;

DESCRIPTION

Net::APNs::HTTP2 is APNs Provider API for Perl.

METHODS

new(%args)

Create a new instance of Net::APNs::HTTP2.

Supported arguments are:

• auth_key : File Path

  Universal Push Notification Client SSL Certificate. But, can not use this auth key as it is. Please convert key as follows:

  openssl pkcs8 -in AuthKey_XXXXXXXXXX.p8 -inform PEM -out auth_key.p8 -outform PEM -nocrypt
  

• key_id : Str

  A 10-character key identifier (kid) key, obtained from your developer account.

• team_id : Str

  The issuer (iss) registered claim key, whose value is your 10-character Team ID, obtained from your developer account.

• bundle_id : Str

  Your Application bundle identifier.

• is_development : Bool

  Development server: api.development.push.apple.com:443 Production server: api.push.apple.com:443

$apns->prepare($device_token, $payload, $callback [, $extra_headers ])

Create a request.

$apns->prepare($device_token, {
    aps => {
       alert => {
          title => 'test message',
          body  => 'from Net::APNs::HTTP2',
       },
       badge => 1,
    },
}, sub {
    my ($header, $content) = @_;
    # $header = [
    #     ":status" => "200",
    #     "apns-id" => "82B34E17-370A-DBF4-5046-FF56A4EA1FAF",
    # ];
    ...
});

You can chainged call

$apns->prepare(...)->prepare(...)->prepare(...)->send();

$apns->send()

Send notification.

$apns->close()

Close connections.

LICENSE

Copyright (C) xaicron.

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

AUTHOR

xaicron xaicron@gmail.com