NAME

Amazon::SNS - Amazon Simple Notification Service made simpler

SYNOPSIS

            

              
              
 use Amazon::SNS;
 my $sns = Amazon::SNS->new({ 'key' => '...', 'secret' => '...' });
 # create a new topic and publish
 my $topic = $sns->CreateTopic('MyTopic')
or die $sns->error;
 $topic->Publish('My test message');
 # delete it!
 $topic->DeleteTopic;
 # publish to a known ARN
 my $topic = $sns->GetTopic('arn:aws:sns:eu-west-1:123456789099:MyTopic');
 $topic->Publish('My test message', 'My Subject');
 # get all topics
 my @topics = $sns->ListTopics;
 print $_->arn, "\n" for @topics;
  
 # change region
 $sns->service('http://sns.us-east-1.amazonaws.com');
            
          

DESCRIPTION

Sorry for not providing a better documentation, patches are always accepted. ;)

METHODS

Amazon::SNS->new({ 'key' => '...', 'secret' => '...' })

            

              
              
Creates an Amazon::SNS object with given key and secret.
            
          

$sns->GetTopic($arn)

            

              
              
Gives you an Amazon::SNS::Topic object using an existing ARN.
            
          

$sns->GetTarget($arn)

            

              
              
Gives you an Amazon::SNS::Target object using an existing ARN. Sending Notification to TargetArn instead of TopicArn.
            
          

$sns->Publish($message, $subject, $attributes) (Amazon::SNS::Target)

            

              
              
When used with Amazon::SNS::Target object (see GetTarget), additional parameter $attributes is used to pass MessageAttributes.entry.N attributes with message.
An example of MobilePush TTL: $attributes = {"AWS.SNS.MOBILE.APNS.TTL" => {"Type" => "String", "Value" => 3600}};
More information can be found on Amazon web site: http://docs.aws.amazon.com/sns/latest/dg/sns-ttl.html
            
          

$sns->CreateTopic($name)

            

              
              
Gives you an Amazon::SNS::Topic object with the given name, creating it 
if it does not already exist in your Amazon SNS account.
            
          

$sns->DeleteTopic($arn)

            

              
              
Deletes a topic using its ARN.
            
          

$sns->ListTopics

            

              
              
The result is a list of all the topics in your account, as an array of Amazon::SNS::Topic objects.
            
          

$sns->error

            

              
              
Description of the last error, or undef if none.
            
          

$sns->status_code

            

              
              
The status code of the last HTTP response.
            
          

ATTRIBUTES

$sns->service

$sns->service($service_url)

            

              
              
Get/set SNS service url, something like 'http://sns.us-east-1.amazonaws.com'.
            
          

$sns->key

$sns->key('...')

            

              
              
Get/set auth key.
            
          

$sns->secret

$sns->secret('...')

            

              
              
Get/set secret.
            
          

$sns->debug

$sns->debug(1)

            

              
              
Get/set debug level. When set to 1 you'll get some debug output on STDERR.
            
          

NOTES

Be sure to use ARNs in the same region as you have set the service to.

The module defaults to the EU (Ireland) region.

AUTHOR

Alessandro Zummo, <a.zummo@towertech.it>

COPYRIGHT AND LICENSE

Copyright (C) 2011-15 Alessandro Zummo

This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License version 2 as published by the Free Software Foundation.