The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

WebService::Aladdin - Aladdin WebService API Module

SYNOPSIS

  use WebService::Aladdin;

  my $p = WebService::Aladdin->new( TTBKey => 'TTBKey' );
  my $data = $p->search('Perl');
  for my $item (@{ $data }) {
      $data->title;
  }
=head1 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 => '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