Perl
と ミルキィホームズ
が好きですuse Acme::MilkyHolmes;
my ($sherlock, $nero, $elly, $cordelia) = Acme::MilkyHolmes->members();
my $sherlock = Acme::MilkyHolmes::Character::SherlockShellingford->new();
$sherlock->name; # => 'シャーロック・シェリンフォード'
$sherlock->nickname; # => 'シャロ'
$sherlock->birthday; # => '3/31'
$sherlock->voiced_by; # => '三森 すずこ'
$sherlock->toys; # => 'サイコキネシス'
my ($sherlock, $nero, $elly, $cordelia) = Acme::MilkyHolmes->members();
$sherlock->say('ってなんでですかー');
$nero->say('僕のうまうま棒〜');
$elly->say('恥ずかしい...');
$cordelia->say('私の...お花畑...');
実行すると、こんな感じ
use WebService::PivotalTracker;
my $pivotal = WebService::PivotalTracker->new( token => 'your api token' );
my $story = $pivotal->get("/projects/$project_id/stories/$story_id");# JSON response が返ってくる
Use a spacebar or arrow keys to navigate