NAME

Net::APNs::Extended - Client library for APNs that support the extended format.

SYNOPSIS

use Net::APNs::Extended;

my $apns = Net::APNs::Extended->new(
    is_sandbox => 1,
    cert_file  => 'apns.pem',
);

# send notification to APNs
$apns->send($device_token, {
    aps => {
        alert => "Hello, APNs!",
        badge => 1,
        sound => "default",
    },
    foo => [qw/bar baz/],
});

# if you want to handle the error
if (my $error = $apns->retrieve_error) {
    die Dumper $error;
}

DESCRIPTION

Net::APNs::Extended is client library for APNs. The client is support the extended format.

METHODS

new(%args)

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

Supported arguments are:

• is_sandbox : Bool

  Default: 1

• cert_file : Str

• cert : Str

  Required.

  Sets certificate. You can not specify both cert and cert_file.

• key_file : Str

• key : Str

  Sets private key. You can not specify both key and key_file.

• password : Str

  Sets private key password.

• read_timeout : Num

  Sets read timeout.

• write_timeout : Num

  Sets write timeout.

$apns->send($device_token, $payload [, $extra ])

Send notification for APNs.

$apns->send($device_token, {
    apns => {
        alert => "Hello, APNs!",
        badge => 1,
        sound => "default",
    },
    foo => [qw/bar baz/],
});

$apns->send_multi([ [ $device_token, $payload [, $extra ] ], [ ... ] ... ])

Send notification for each data. The data chunk is same as send() arguments.

$apns->retrieve_error()

Gets error data from APNs. If there is no error will not return anything.

if (my $error = $apns->retrieve_error) {
    die Dumper $error;
}

AUTHOR

xaicron <xaicron {@} cpan.org>

COPYRIGHT

Copyright 2012 - xaicron

LICENSE

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

SEE ALSO