HTML::AccountIDAutoDiscovery-0.02
http://d.hatena.ne.jp/tociyuki/20050726/1122376587 で FOAF RDF 埋め込みの Auto-Discovery 用 Perl モジュールを id:tociyuki さんが作っていたので、先日僕が作った HTML::HatenaIDAutoDiscovery と merge してみた。
もちろん、まだ仕様が固まってないので CPAN にはあげてない。merge と言ってもインタフェースを find 以外に find_in_html を加えたのと、HTML 取得処理周り、引数渡し周りを残して実際の parse は tociyuki さんの each_account メソッドをそのまま使っています。あと、モジュール名を変えた。
当初 Perl Licence にしようと思ってたのだけど、tociyuki さんのが LGPL だったのでとりあえず今回 merge したものも LGPL にしているのだけど、こういう場合のライセンスとかプライマリのメンテナとかどうしたらいいのかな。
NAME HTML::AccountAutoDiscovery - finding online account names in HTML SYNOPSIS use HTML::AccountAutoDiscovery; my @account = HTML::AccountAutoDiscovery->find('http://www.example.com'); ## OR my @account = HTML::AccountAutoDiscovery->find_in_html(\$html); print $account[0]->{account}; # account name print $account[0]->{service}; # service URI or literal DESCRIPTION HTML::AccountAutoDiscovery implements Account Auto-Discov- ery from given a URI or a HTML document. Account Auto-Discovery is a spec for searching account names of some online services in the HTML. You can see the document of the spec at http://d.hatena.ne.jp/key- words/now_under_construction but only for Japanese. AUTHOR Naoya Ito <naoya@naoya.dyndns.org>, MIZUTANI Tociyuki <http://tociyuki.cool.ne.jp> This is free software; you can redistribute it and/or mod- ify it under the terms of the GNU Lessar General Public License as published by the Free Software Foundation ver- sion 2.1. SEE ALSO Feed::Find - The implementation of HTML::AccountAutoDis- covery reffered to this module.
おそらく英語がかなりむちゃくちゃだけど、アウトプット主義ということで晒してみます。