tomyheroの日記 このページをアンテナに追加 RSSフィード

 | 

2007-11-07

[] お友達を見つけるモジュール拡張し、複数サイト検索、オレオレおすすめユーザプラグイン作成ができるようにしました。 00:30  お友達を見つけるモジュールを拡張し、複数サイト検索、オレオレおすすめユーザプラグイン作成ができるようにしました。 - tomyheroの日記 を含むブックマーク はてなブックマーク -  お友達を見つけるモジュールを拡張し、複数サイト検索、オレオレおすすめユーザプラグイン作成ができるようにしました。 - tomyheroの日記  お友達を見つけるモジュールを拡張し、複数サイト検索、オレオレおすすめユーザプラグイン作成ができるようにしました。 - tomyheroの日記 のブックマークコメント

http://coderepos.org/share/browser/lang/perl/Net-Twitter-FriendFinder

 svn co http://svn.coderepos.org/share/lang/perl/Net-Twitter-FriendFinder/trunk/

Net::Twitter::Friend::Finderインターフェイスを変更したので、

名前を変えてNet::Twitter::FriendFinderというのを作りました。

異なる点

  • 検索件数だけでスコアーをつけていたのを、表示順も考慮するようにしました
  • 複数のサイトから同時に検索できるようになりました
  • なんちゃってプラグイン的に使えるようになったと思う。
  • オレのおすすめツイッターユーザを追加してくれ!というのが簡単になったと思う。

友達の見つけ方

GoogleTwitterサイトから探します。

 use Net::Twitter::FriendFinder;
 my $tf 
    = Net::Twitter::FriendFinder->new({ 
        setting => {limit => 10 },
        from => {
            Google  => { coverage => 4 , lang=> 'ja' },
            Twitter => { coverage => 4 , handicap => 1.3 } ,
        }
      });

    $tf->search( 'エロ' );
    $tf->show();

f:id:tomyhero:20071108001412p:image

オレオレおすすめユーザプラグイン

あなたのおすすめユーザパッケージにして配布すれば、手間が省けること間違い無し。

package OreOre::Osusume;

use strict;
use warnings;
use base qw/Net::Twitter::FriendFinder::From/;

sub search {
    # id => score
    return {
        tomyhero => 10000,
        kopug    => 1,
        help     => 10,
    }
}

1;
#!/usr/bin/perl


use Net::Twitter::FriendFinder;
 my $tf
    = Net::Twitter::FriendFinder->new({
        from => {
            '+OreOre::Osusume' => {},
        }
      });

$tf->search();
$tf->show();

f:id:tomyhero:20071108002710p:image

TODO(もし良ければどなたか)

ゲスト



トラックバック - http://twitter.g.hatena.ne.jp/tomyhero/20071107
 |