Skip site navigation (1)Skip section navigation (2)

FreeBSD Manual Pages


home | help
WebService::Prowl::AnyUsertContributed Perl WebService::Prowl::AnyEventHTTP(3)

       WebService::Prowl::AnyEventHTTP - a sub class of	WebService::Prowl
       sending http requests by	using AnyEvent::HTTP

SYNOPSIS =for test_synopsis my($ws,$apikey);
	 use WebService::Prowl::AnyEventHTTP;
	 my $ws	= WebService::Prowl::AnyEventHTTP->new(apikey => $apikey, on_error => sub {warn	$_[0]})

	 $ws->add('event' => $event, application => $application, description => $description);

       WebService::Prowl::AnyEvent is a	sub class of WebService::Prowl to use
       AnyEvent::HTTP non-blocking http	client

SYNOPSIS =for test_synopsis my($ws,$apikey);
       This module aims	to be a	implementation of a interface to the Prowl
       Public API by using AnyEvent::HTTP non-blocking http client library

	   my $ws = WebService::Prowl::AnyEventHTTP->new(apikey	=> $apikey, on_error =>	sub {warn $_[0]});

	       username	=> $username,
	       passwordn => $password,
	       method => 'track',
	       keyword => '@' .	$username,
	       on_tweet	=> sub {
		   my $tweet = shift;
		   my $screen_name = Encode::decode_utf8($tweet->{user}{screen_name});
		   my $text	   = Encode::decode_utf8($tweet->{text});
		   my $description = "$screen_name: $text";
		   $ws->add('event' => $event, application => $application, description	=> $description);

       new(apikey => 40byteshexadecimalstring, providerkey =>
       yetanother40byteshex, on_error => sub { warn $_0]})
	   Call	new() to create	a Prowl	Public API client object. You must
	   pass	the apikey, which you can generate on "settings" page

	     my	$apikey	= 'cf09b20df08453f3d5ec113be3b4999820341dd2';
	     my	$ws = WebService::Prowl->new(apikey => $apikey,	on_error => sub	{ warn $_[0] });

	   and you can specify a callback "on_error" which is called when it
	   gets	error from Prowl API server.

	   If you have been whitelisted, you may want to use 'providerkey'
	   like	this:

	     my	$apikey	     = 'cf09b20df08453f3d5ec113be3b4999820341dd2';
	     my	$providerkey = '68b329da9893e34099c7d8ad5cb9c94010200121';

	     my	$ws = WebService::Prowl->new(apikey => $apikey,	providerkey => $providerkey, on_error => sub {warn $_[0]});

	   on_error => $callback->( $error_msg,	$url, $data, $headers )
	       When specified, this callback will be called with the error
	       message from API	server,	the url, http response body data and

	   Sends a verify request to check if apikey is	valid or not. return 1
	   for success.


       add(application => $app,	event => $event, description =>	$desc,
       priority	=> $pri)
	   Sends a app request to api and return 1 for success.

	     application: [256]	(required)
		 The name of your application

	     event: [1024] (required)
		 The name of the event

	     description: [10000] (required)
		 A description for the event

	     priority: An integer value	ranging	[-2, 2]
		 a priority of the notification: Very Low, Moderate, Normal, High, Emergency
		 default is 0 (Normal)

	     $ws->add(application => "Favotter App",
		      event	  => "new fav",
		      description => "your tweet saved as sekimura's favorite");

       Masayoshi Sekimura <>

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

       AnyEvent::HTTP, <>,

perl v5.32.0			  2016-05-22WebService::Prowl::AnyEventHTTP(3)

NAME | SYNOPSIS =for test_synopsis my($ws,$apikey); | DESCRIPTION | SYNOPSIS =for test_synopsis my($ws,$apikey); | METHODS | AUTHOR | LICENSE | SEE ALSO

Want to link to this manual page? Use this URL:

home | help