The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

WebService::Aladdin - Aladdin WebService API Module

SYNOPSIS

  use WebService::Aladdin;

  my $p = WebService::Aladdin->new( TTBKey => 'Your TTBKey' );
  my $data = $p->search('Perl');
  for my $item (@{ $data }) {
      print $item->title, "\n";
  }

DESCRIPTION

WebService::Aladdin is Aladdin WebService API Module. Aladdin(http://www.aladdin.co.kr) is a Korean electronic commerce company in Seoul, Korea. They mainly sell books and Gift and DVD and etc.

FUNCTIONS

new( TTBKey => 'Your TTBKey' )

Returns an instance of this module. If you don't enter TTBKey parameter, It's ok. Because default TTBKey is mine. :-)

search( $keyword, \%options )

Returns search results.

  my $data = $p->search('Perl', { 
      SearchTarget => $SearchTarget, # (?:Book|Music|DVD|Beauty|Gift)
      QueryType => $QueryType,       # (?:Title|Author|Publisher)
      Start => $Start,               # search result start page
      MaxResults => $MaxResults,     # max number of a page
      Sort => $Sort,                 # (?:PublishTime|Title|SalesPoint|CustomerRating|MyReviewCount)
      Cover => $Cover,               # (?:Mid|Small|Big|Mini|None)
      TitleCut => $TitleCut,         # truncate
      CategoryId => $CategoryId, 
      Partner => $Partner,  
 });

product( $keyword, \%options )

Returns product information.

  my $data = $p->product($ISBN, {
    ItemIdType => $args->{ItemIdType}, # (?:ISBN|ItemId)
    Cover  => $args->{Cover},          # (?:Mid|Small|Big|Mini|None)
    Partner => $args->{Partner},
});

AUTHOR

JEEN <jeen@perk_dot_kr>

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

SEE ALSO

http://www.aladdin.co.kr/ttb/wguide.aspx?pn=apiguide

http://blog.aladdin.co.kr/ttb/category/16526941?communitytype=MyPaper