Kentaro Kuribayashi > Acme-MorningMusume-0.01 > Acme::MorningMusume::Base

Download:
Acme-MorningMusume-0.01.tar.gz

Dependencies

Annotate this POD

CPAN RT

New  1
Open  0
View Bugs
Report a bug
Module Version: 0.01   Source   Latest Release: Acme-MorningMusume-0.11

NAME ^

Acme::MorningMusume::Base - A baseclass represents a member of Morning Musume

SYNOPSIS ^

  use Acme::MorningMusume;

  my $musume = Acme::MorningMusume->new;

  # retrieve the members as a list of
  # Acme::MorningMusume::Base based objects
  my @members = $musume->members;

  for my $member (@member) {
      my $first_name    = $member->first_name;
      my $family_name   = $member->family_name;
      my $pronunciation = $member->pronunciation;
      my $nick          = $member->nick;          # arrayref
      my $birthday      = $member->birthday;      # Date::Simple object
      my $age           = $member->age;
      my $blood_type    = $member->blood_type;
      my $hometown      = $member->hometown;
      my $emoticon      = $member->emoticon;      # arrayref
      my $class         = $member->class;
      my $graduate_date = $member->graduate_date; # Date::Simple object

      my $images = $member->images(limit => 5);
      while (my $image = $images->next) {
          $count++;
          my $content_url = $image->content_url;
          my $context_url = $image->context_url;
          $image->save_content(base => 'image' . $count);
          $image->save_context(base => 'page'  . $count);
      }
  }

DESCRIPTION ^

Acme::MorningMusume::Base is a baseclass of the class represents each members.

METHODS ^

images ( [ %arg ] )

  # %arg can be passed in the same as the WWW::Google::Image:search method
  my $images = $member->images(limit => 5);

Performs a search for $member's name using Google, and returns a WWW::Google::Images::SearchResult object. See the documentation of WWW::Google::Images for details.

ACCESSORS ^

first_name

family_name

pronunciation

nick

birthday

age

blood_type

hometown

emoticon

class

graduate_date

SEE ALSO ^

AUTHOR ^

Kentaro Kuribayashi, <kentarok@gmail.com>

COPYRIGHT AND LICENSE ^

Copyright (C) 2005 by Kentaro Kuribayashi

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