以前、都内の図書館やらをマーキングする Google マイマップを作ったのだけど、手作業でマーカーを追加するしかなく非常にめんどうだったので放置していた。 が、いつのまにか KML インポート機能が追加されていたので、これを使ってさっくり完成させました…

書名で検索してヒットした本の ISBN で検索してもヒットしてくれません。絶対バ（ｒｙ。検索ページには - (ハイフン)は不要です。 ＩＳＢＮが入力文字列で始まるものを検索します。 とある。 前方一致検索と読めるが、検索する前のチェックではじかれてる気…

今日は雨で出かけるのが面倒になったので、前から作ろうと思っていた都内の図書館＋αをまとめて蔵書検索する Greasemonkey スクリプトを書いた。やりたいことの半分くらいしかできなかったけど…。 こんな感じで検索対象を定義する。予想外に複雑になってしま…

#!/usr/bin/perl use strict; use warnings; use utf8; use Web::Scraper; use LWP::UserAgent; use HTTP::Response::Encoding; use Encode; use YAML; use URI; my $ua = LWP::UserAgent->new(keep_alive => 1); $Web::Scraper::UserAgent = $ua; my $resp …

#!/usr/bin/perl use strict; use warnings; use utf8; use Web::Scraper; use YAML; use URI; print Dump scraper { process '//table[tr/th]/tr[2]', info => scraper { process '//td[2]/font/a', href => '@href'; process '//td[6]', umu => 'text'; };…

#!/usr/bin/perl use strict; use warnings; use utf8; use Web::Scraper; use LWP::UserAgent; use URI; use YAML; $Web::Scraper::UserAgent = LWP::UserAgent->new(keep_alive => 1); my $data= scraper { process '//table/tbody/tr/td/a', href => '@hr…

財布に図書館カードが４、５枚入っているのを見られた。冗談だと信じているがキモイって言われた。もちろん２０枚ほど持ってることは言わなかった。キモくなんかないよね？

品川区立図書館の所蔵状態チェック。あとでまとめるので結果は特に編集してない。 #!/usr/bin/perl use strict; use warnings; use utf8; use YAML qw(Dump); use Encode qw(decode); use Web::Scraper; use LWP::UserAgent; use HTTP::Response::Encoding; …

Google マイマップで地味に編集してます。都内の図書館と、車で行った所は実際に駐車したパーキングをマーキング。韻を踏んでみました。 東京図書館マップ

via 3分LifeHacking：おとなの図書館活用術【Amazon編】 で、中野区版を作ってみた。べんりー。 中野区図書館検索Greasemonkeyスクリプト おとうさんのつれづれLifehack（ライフハック）さんとこのソースをほぼそのままいただきました。ありがとうございます…