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.おそらく英語がかなりむちゃくちゃだけど、アウトプット主義ということで晒してみます。