git ã«ãã£ã¦å ãã°ããããæ°ãã§ãã®ã§ãWebService::LivedoorReader ãã¡ãã£ã¨ã ãé²ããã ã¨ã¯ãããååä½ã£ã¦ããç¶æ ã¨ã»ã¼å¤åã¯ãªããæ©è½çã«ã¯ãããéåããããã¦ãã ã³ã³ã¹ãã©ã¯ã¿ã¯å é¨ã«ã¦ WWW::Mechanize ãæ§ç¯ããç¨åº¦ã§ãä»å¾ä½ããã©ã¡ã¼ã¿ã«ããããèãããããä»ã®æ©è½ãå®è£ ããã¾ã§å¾åãã«ããäºå®ãMoose åãèãããã®ã®ãMoose ã®åå¼·ã«ç¸å½ããããããªæ°ãããã®ã§ãã¨ããããããã·ã¥ãã¼ã¹ã§ã sub new { my ($class, $param) = @_; my $self = bless { mech => WWW::Mechanize->new, user => $param->{username}, pass => $param->{password}, }, $class; $self; } LDR ã®
{{#tags}}- {{label}}
{{/tags}}