view release on metacpan or search on metacpan
> my $musume = Acme::MorningMusume->new;
>
> Creates and returns a new Acme::MorningMusume object.
## members ( $type )
> # $type can be one of the values below:
> # + active : active members
> # + graduate : graduate members
> # + DateTime object : members at the time passed in
> # + undef : all members
>
> my @members = $musume->members('active');
>
> Returns the members as a list of the [Acme::MorningMusume::Base](https://metacpan.org/pod/Acme::MorningMusume::Base)
> based object represents each member. See also the documentation of
> [Acme::MorningMusume::Base](https://metacpan.org/pod/Acme::MorningMusume::Base) for more details.
## sort ( $type, $order \[ , @members \] )
> # $type can be one of the values below:
lib/Acme/MorningMusume.pm view on Meta::CPAN
2000-04-16
2001-08-26
2003-01-19
2005-05-01
2006-12-10
2011-01-02
2011-09-29
2012-09-14
2014-09-30
);
unshift @date_joined, undef;
sub new {
my $class = shift;
my $self = bless {members => []}, $class;
$self->_initialize;
return $self;
}
lib/Acme/MorningMusume.pm view on Meta::CPAN
=back
=head2 members ( $type )
=over 4
# $type can be one of the values below:
# + active : active members
# + graduate : graduate members
# + DateTime object : members at the time passed in
# + undef : all members
my @members = $musume->members('active');
Returns the members as a list of the L<Acme::MorningMusume::Base>
based object represents each member. See also the documentation of
L<Acme::MorningMusume::Base> for more details.
=back
=head2 sort ( $type, $order [ , @members ] )
lib/Acme/MorningMusume/FukumuraMizuki.pm view on Meta::CPAN
first_name_ja => 'è',
family_name_ja => 'èä¹
æ',
first_name_en => 'Mizuki',
family_name_en => 'Fukumura',
nick => [qw(ãã¯ã¡ãã ã¿ã¼ã¡ãã ã¿ãâãã³)],
birthday => $_[0]->_datetime_from_date('1996-10-30'),
blood_type => 'O',
hometown => 'æ±äº¬é½',
emoticon => ['ãï¾â®â _lâï¼'],
class => 9,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/HagaAkane.pm view on Meta::CPAN
first_name_ja => 'æ±é³',
family_name_ja => 'ç¾½è³',
first_name_en => 'Akane',
family_name_en => 'Haga',
nick => [qw()],
birthday => $_[0]->_datetime_from_date('2002-03-17'),
blood_type => 'O',
hometown => 'é·éç',
emoticon => [''],
class => 12,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/IikuboHaruna.pm view on Meta::CPAN
first_name_ja => 'æ¥è',
family_name_ja => '飯窪',
first_name_en => 'Haruna',
family_name_en => 'Iikubo',
nick => [qw(ã¯ããªã)],
birthday => $_[0]->_datetime_from_date('1994-11-07'),
blood_type => 'O',
hometown => 'æ±äº¬é½',
emoticon => [''],
class => 10,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/IkutaErina.pm view on Meta::CPAN
first_name_ja => '衣梨å¥',
family_name_ja => 'çç°',
first_name_en => 'Erina',
family_name_en => 'Ikuta',
nick => [qw(ããã½ã)],
birthday => $_[0]->_datetime_from_date('1997-07-07'),
blood_type => 'A',
hometown => 'ç¦å²¡ç',
emoticon => ['|||9|â_ãâ)'],
class => 9,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/IshidaAyumi.pm view on Meta::CPAN
first_name_ja => 'äºä½ç¾',
family_name_ja => 'ç³ç°',
first_name_en => 'Ayumi',
family_name_en => 'Ishida',
nick => [qw(ã ã¼ãã ããã¿ã)],
birthday => $_[0]->_datetime_from_date('1997-01-07'),
blood_type => 'O',
hometown => 'å®®åç',
emoticon => [''],
class => 10,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/KudohHaruka.pm view on Meta::CPAN
first_name_ja => 'é¥',
family_name_ja => 'å·¥è¤',
first_name_en => 'Haruka',
family_name_en => 'Kudoh',
nick => [qw(ãã©ã
ã¼)],
birthday => $_[0]->_datetime_from_date('1999-10-27'),
blood_type => 'A',
hometown => 'å¼çç',
emoticon => [''],
class => 10,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/MakinoMaria.pm view on Meta::CPAN
first_name_ja => 'çèæ',
family_name_ja => 'ç§é',
first_name_en => 'Maria',
family_name_en => 'Makino',
nick => [qw()],
birthday => $_[0]->_datetime_from_date('2001-02-02'),
blood_type => 'O',
hometown => 'æç¥ç',
emoticon => [''],
class => 12,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/NonakaMiki.pm view on Meta::CPAN
first_name_ja => 'ç¾å¸',
family_name_ja => 'éä¸',
first_name_en => 'Miki',
family_name_en => 'Nonaka',
nick => [qw()],
birthday => $_[0]->_datetime_from_date('1999-10-07'),
blood_type => 'A',
hometown => 'é岡ç',
emoticon => [''],
class => 12,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/OdaSakura.pm view on Meta::CPAN
first_name_ja => 'ããã',
family_name_ja => 'å°ç°',
first_name_en => 'Sakura',
family_name_en => 'Oda',
nick => [qw(ãããã£ãã ããã)],
birthday => $_[0]->_datetime_from_date('1999-03-12'),
blood_type => 'A',
hometown => 'ç¥å¥å·ç',
emoticon => [''],
class => 11,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/OgataHaruna.pm view on Meta::CPAN
first_name_ja => 'æ¥æ°´',
family_name_ja => '尾形',
first_name_en => 'Haruna',
family_name_en => 'Ogata',
nick => [qw()],
birthday => $_[0]->_datetime_from_date('1999-02-15'),
blood_type => 'A',
hometown => '大éªåº',
emoticon => [''],
class => 12,
graduate_date => undef,
);
}
1;
lib/Acme/MorningMusume/SatohMasaki.pm view on Meta::CPAN
first_name_ja => 'åªæ¨¹',
family_name_ja => 'ä½è¤',
first_name_en => 'Masaki',
family_name_en => 'Satoh',
nick => [qw(ã¾ãã ã¾ã¼ã¡ãã)],
birthday => $_[0]->_datetime_from_date('1999-05-07'),
blood_type => 'O',
hometown => 'åæµ·é',
emoticon => [''],
class => 10,
graduate_date => undef,
);
}
1;
t/01_members.t view on Meta::CPAN
use strict;
use DateTime;
use Acme::MorningMusume;
use Test::More tests => 4;
my $musume = Acme::MorningMusume->new;
is scalar($musume->members), 38, " members(undef) retrieved all";
is scalar($musume->members('active')), 11, " members('active')";
is scalar($musume->members('graduate')), 27, " members('graduate')";
is scalar($musume->members(DateTime->new(year => 2001, month => 1, day => 1))), 10, " members('date_simple_object')";