WebService::MyAffiliates - Interface to myaffiliates.com API
use WebService::MyAffiliates;
my $aff = WebService::MyAffiliates->new(
user => 'user',
pass => 'pass',
host => 'admin.example.com'
);
my $token_info = $aff->decode_token($token) or die $aff->errstr;
WebService::MyAffiliates is Perl interface to http://www.myaffiliates.com/xmlapi
It's incompleted. patches are welcome with pull-requests of https://github.com/binary-com/perl-WebService-MyAffiliates
-
user
required. the Basic Auth username.
-
pass
required. the Basic Auth password.
-
host
required. the Basic Auth url/host.
Feed 1: Users Feed
https://myaffiliates.atlassian.net/wiki/display/PUB/Feed+1%3A+Users+Feed
my $user_info = $aff->get_users(USER_ID => $id);
my $user_info = $aff->get_users(STATUS => 'new');
my $user_info = $aff->get_users(VARIABLE_NAME => 'n', VARIABLE_VALUE => 'v');
my $user_info = $aff->get_user($id); # { ID => ... }
call get_users(USER_ID => $id) with the top evel USER key removed.
Feed 4: Decode Token
https://myaffiliates.atlassian.net/wiki/display/PUB/Feed+4%3A+Decode+Token
my $token_info = $aff->decode_token($token); # $token_info is a HASH which contains TOKEN key
my $token_info = $aff->decode_token($tokenA, $tokenB);
Feed 5: Encode Token
https://myaffiliates.atlassian.net/wiki/display/PUB/Feed+5%3A+Encode+Token
my $token_info = $aff->encode_token(
USER_ID => 1,
SETUP_ID => 7
);
Feed 6: User Transactions Feed
https://myaffiliates.atlassian.net/wiki/display/PUB/Feed+6%3A+User+Transactions+Feed
my $transactions = $aff->get_user_transactions(
'USER_ID' => $id,
'FROM_DATE' => '2011-12-31',
'TO_DATE' => '2012-01-31',
);
Binary.com [email protected]
Copyright 2014- Binary.com
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.