2009-02-21

皇居

life photo

軽く皇居を散歩した。(・∀・)ｲｲ!!
　

2009-02-20

Geography::JapaneseMunicipals

perl

Geography::JapanesePrefecturesの市区町村版みたいなGeography::JapaneseMunicipalsを作った。
近々、CPANにうｐしようかと。

use strict;
use warnings;
use utf8;

use FindBin::libs;
use Geography::JapaneseMunicipals;
use YAML;

binmode STDOUT, ':encoding(sjis)';

my $name = '東京都渋谷区';
my $id = Geography::JapaneseMunicipals->municipal_id($name);
print "$name -> $id\n";
# 東京都渋谷区 -> 13113

$id = '01202';
$name = Geography::JapaneseMunicipals->municipal_name($id);
print "$id -> $name\n";
# 01202 -> 函館市

my $municipals = Geography::JapaneseMunicipals->municipal_infos('東京都');
print Dump $municipals;
# ---
# - id: 13101
#   name: 千代田区
#   prefecture:
#     id: 13
#     name: 東京都
#   region:
#     name: 関東
# 
# ...
# 
# - id: 13421
#   name: 小笠原村
#   prefecture:
#     id: 13
#     name: 東京都
#   region:
#     name: 関東

2009-02-05

WWW::Mechanize::Plugin::Web::Scraper

perl

文字ばっけー対策パッチ（数文字だけど…）送ったら速攻採用してくれてうれしかった。
中学生レベルの英語を間違えたのに気づいて恥ずかしかった。
WWW-Mechanize-Plugin-Web-Scraper-0.02 - Scrape the planet! - metacpan.org

2009-02-02

WWW::PASMO

perl

http://www.pasmo.co.jp/useful/mypage.htmlをスクレイピングするモジュールWWW::PASMOを作ってとりあえずコミッた。

use strict;
use warnings;

use WWW::PASMO;
use YAML;

my $pasmo = WWW::PASMO->new;
die "faild to login"
    unless $pasmo->login('your id', 'your pswd');

print Dump $pasmo->history();

[h@lily]% perl pasmo.pl     
---
histories:
  - balance: 330
    date: 02/01
    info1:
      kind: 入
      station: 旗の台
    info2:
      kind: 出
      station: 自由が丘
  - balance: 480
    date: 01/31
    info1:
      kind: 入
      station: 東急五反
    info2:
      kind: 出
      station: 旗の台
...
  - balance: 1230
    date: 01/27
    info1:
      kind: ｶｰﾄﾞ
      station: 富士見台
    info2:
      kind: ''
      station: ''
...
  - balance: 1070
    date: 01/25
    info1:
      kind: 現金
      station: 富士見台
    info2:
      kind: ''
      station: ''
[h@lily]%

東急五反って…。駅名からジオコーディングしてあれこれしたかったのだけどな。

2009-01-26

ISBNScraper

javascript greasemonkey

これ使えば巷にあふれる Amazon 系グリモンとかいろんなサイトに対応できるよ、きっと。
めんどいので詳細はコード見て想像してください。前に書いたのをちょっときれいにしただけだけど。

// ==UserScript==
// @name           isbntest
// @namespace      http://d.hatena.ne.jp/hetappi
// @include        http://www.google.co.jp/*
// @require        http://isbnjs.googlecode.com/svn/trunk/isbn.js
// @require        http://isbnjs.googlecode.com/svn/trunk/isbn-groups.js
// @require        http://svn.coderepos.org/share/lang/javascript/userscripts/GM_Libs/hetappi/gmutils.js
// @require        http://svn.coderepos.org/share/lang/javascript/userscripts/GM_Libs/hetappi/isbnscraper.js
// ==/UserScript==

(function() {
    var scraper = new ISBNScraper();
///    scraper.awsKeyId = '12345678901234567890';
    scraper.scrape('http://www.7andy.jp/books/detail/-/accd/R0349944', function(isbn, book) {
        console.log(isbn.asIsbn13(1));
        if (book) {
            console.log(book.author);
            console.log(book.title);
            console.log(book.manufacturer);
        }
    });
})();