GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages


Manual Reference Pages  -  WEBSERVICE::BUZZURLAPI (3)

.ds Aq ’

NAME

WebService::BuzzurlAPI - Buzzurl WebService API

CONTENTS

VERSION

0.02

SYNOPSIS



  use WebService::BuzzurlAPI;
  use strict;

  my $buzz = WebService::BuzzurlAPI->new(email => "your email", password => "your password");
  # readers api
  my $res = $buzz->readers( userid => "your userid" );
  if($res->is_success){
      my $json = $res->json;
      # do something
  }else{
      die $res->errstr;
  }



DESCRIPTION

Buzzurl is social bookmark service.

For more information on Buzzurl, visit the Buzzurl website. http://buzzurl.jp/.

API Reference. http://labs.ecnavi.jp/developer/buzzurl/api/

METHOD

    new

Create instance

Option:



  email    : your login email(require when add api)
  password : your login password(require when add api)



Example:



  my $buzz = WebService::BuzzurlAPI->new(email => "your email", password => "your password");



    readers

Get readers userid

Options:



  userid  : userid(require)



Example:



  my $res = $buzz->readers( userid => "userid" );
  if($res->is_success){
    foreach my $userid(@{$res->json}){
        # do something...
    }
  }



    favorites

Get favorites userid

Options:



  userid  : userid(require)



Example:



  my $res = $buzz->favorites( userid => "userid" );
  if($res->is_success){ 
    foreach my $userid(@{$res->json}){
        # do something...
    }
  }



    url_info

Get url info

Options:



  url    : url(require)



Example:



  my $res = $buzz->url_info( url => "http://your.wanted.domain/" );
  if($res->is_success){
     my $urlinfo = shift @{$res->json};
     my $url = $urlinfo->{url};
     my $title = $urlinfo->{title};
     my $user_num = $urlinfo->{user_num};
     foreach my $ref(@{$userinfo->{posts}}){
        my $keywords = $ref->{keywords};
        my $comment = $ref->{comment};
        my $date = $ref->{date};
        my $user_name = $ref->{user_name};
     }
     # do something...
  }



    bookmark_count

Get bookmark count

Options:



  url   : url(require max:30)



Example:



  my $res = $buzz->bookmark_count( url => "http://your.wanted.domain" );
  # multiple
  # my $res = $buzz->bookmark_count( url => [ "http://your.wanted.domain", "http://your.wanted.domain2" ] );
  if($res->is_success){ 
    foreach my $ref(@{$res->json}){
        my $url = $ref->{url};
        my $title = $ref->{title};
        my $users = $ref->{users};
        # do something...
    }
  }



    user_articles

Get user articles

Options:



  userid  : userid(require)



Example:



  my $res = $buzz->user_articles( userid => "userid" );
  if($res->is_success){ 
    foreach my $ref(@{$res->json}){
        my $url = $ref->{url};
        my $title = $ref->{title};
        my $comment = $ref->{comment};
        my $keywords = $ref->{keywords};
        # do something...
    }
  }



    recent_articles

Get recent articles

Options:



  num       : get number(default:5)
  of        : page number(default:0)
  threshold : bookmark count threshold(default:0)



Example:



  my $res = $buzz->recent_articles( num => 0, of => 1, threshold => 3 );
  if($res->is_success){ 
    foreach my $ref(@{$res->json}){
        my $url = $ref->{url};
        my $title = $ref->{title};
        my $user_num = $ref->{user_num};
        my $user_id = $ref->{user_id};
        my $register_date = $ref->{register_date};
        # do something...
    }
  }



    keyword_articles

Get keyword articles

Options:



  userid  : userid(require)
  keyword : keyword string(require)



Example:



  my $res = $buzz->keyword_articles( userid => "userid", keyword => "keyword string" );
  if($res->is_success){ 
    foreach my $ref(@{$res->json}){
        my $url = $ref->{url};
        my $title = $ref->{title};
        my $user_num = $ref->{user_num};
        my $user_id = $ref->{user_id};
        my $register_date = $ref->{register_date};
        # do something...
    }
  }



    add

Add my bookmark(https + basic auth access)

Options:



  url     : bookmark url(require)
  title   : bookmark title
  comment : bookmark comment
  keyword : bookmark keyword(max:8)



Example:



  my $res = $buzz->add(
             url     => "http://your.register.domain/",
             title   => "my bookmark title",
             comment => "my bookmark comment",
             keyword => "my keyword",
             # multiple keyword
             keyword => [ "my keyword", "my keyword2" ],
            );
  if($res->is_success){
    print $res->json->{status} . "\n";
  }else{
    die $res->errstr;
  }



ACCESSOR METHOD

    email

Get/Set login email

Example:



  $buzz->email("your email");
  my $email = $buzz->email;



    password

Get/Set login password

Example:



  $buzz->password("your password");
  my $password = $buzz->password;



    ua

Get LWP::UserAgent instance(Readonly)

Example:



  # LWP::UserAgent::timeout
  $buzz->ua->timeout(30);
  # LWP::UserAgent::env_proxy
  $buzz->ua->env_proxy;



SEE ALSO

Class::Accessor LWP::UserAgent Readonly UNIVERSAL::require URI

AUTHOR

Akira Horimoto

COPYRIGHT

Copyright (C) 2007 Akira Horimoto

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

Search for    or go to Top of page |  Section 3 |  Main Index


perl v5.20.3 WEBSERVICE::BUZZURLAPI (3) 2007-05-09

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with manServer 1.07.