Catalyst-View-APNS
view release on metacpan or search on metacpan
t/lib/TestApp.pm view on Meta::CPAN
package TestApp;
use strict;
use warnings;
use Catalyst;
our $VERSION = '0.01';
use FindBin;
__PACKAGE__->config({
name => 'TestApp',
'View::APNS' => {
apns => {
certification => "/cert.pem",
private_key => "/key.pem",
passwd => "abcdefg",
}
},
});
__PACKAGE__->setup;
sub appname : Global {
my ( $self, $c ) = @_;
$c->stash->{apns} = {
device_token => 'd'x32,
message => "Test",
badge => 5,
};
$c->forward('TestApp::View::APNS');
}
sub push : Global {
my ( $self, $c ) = @_;
$c->stash->{apns} = {
device_token => 'd'x32,
message => "Test",
badge => 5,
};
$c->forward('TestApp::View::APNS');
}
1;
( run in 1.467 second using v1.01-cache-2.11-cpan-39bf76dae61 )