注：AsamasiBookSearch はサービス終了しました

AsamasiBookSearch に新機能。
amazon と bk１のアフィリエイトIDを自由に設定できるようにしました。
それぞれパラメータ aid、bid で指定します。
検索結果のURLに追加してご利用ください。例：

http://booksearch.asamasi.net/search.cgi?key=%E6%A0%AA&aid=XX-22
http://booksearch.asamasi.net/search.cgi?key=GE&aid=XX-22&bid=p-XX

ついでに、chalow用のプラグインも作りました。
以下のコードを cl.conf に追加してご利用ください。

### AsamasiBookSearch 検索
# usage: {{a4b('検索エンジン')}}
# usage: {{a4b('検索エンジン','XXXXX-22')}}
# usage: {{a4b('検索エンジン','XXXXX-22','p-XXXX')}}
sub a4b {
    my ($k, $aid, $bid) = @_;
    my $o = $k;
    $k = Jcode->new($k)->utf8;
    $k =~ s/([^0-9a-z_ ])/'%'.unpack('H2', $1)/gei;
    $k =~ s/\s/+/g;
    my $a = (length($aid)?"&aid=$aid":"").(length($bid)?"&bid=$bid":"");
    return 
      qq(<a href="http://booksearch.asamasi.net/search.cgi?key=$k$a">$o</a>);
}