NAME
Net::Twitter::FriendFinder - find your twitter friend :-)
DESCRIPTION
Hello. I started twitter but I did not have much friends. Since I am shay, so that I created this module.
You can find twitter friends by using keyword search and then you can follow friends whith this module.
SYNOPSYS
use Net::Twitter::FriendFinder;
my $tf
= Net::Twitter::FriendFinder->new({
setting => {
limit => 20,
on_echo=> 1,
username => '****',
password => '****',
filter_already_followers => 1,
sleep => 60,
},
default => {
coverage => 1,
} ,
from => {
Google => { coverage => 4 },
Twitter => { handicap => 1.3 } ,
TwitterKensaku => { coverage => 2 },
+My::Resource => {}, # your own resource
}
});
$tf->search( $keyword );
$tf->show();
$tf->follow();
MODULE
new
You should set configulation here.
- setting
- ->{limit}
-
you can set limit for how many friends you want to find for max.
- ->{on_echo}
-
when on_echo = 1 then , $tf->follow() method print out who you are going to follow.
- ->{username}
-
twitter username
- ->{password}
-
twitter password
- ->{sleep}
-
since Twitter API has request count limitation, you may want to set sleep time when you try to follow a lot of people.
filter_already_followers - when true, it will check your current followers and not try to follow again. required username and password for this. NOTICE: you may miss some friends to filter who add recently because Twitter API does not return them.
- default
-
you can set default setting here.
- ->{coverage}
-
you can set how much you cover. It depend on where you get resource from , so check the resource POD.
- from
-
You can set where to search friends from. you can find resource from Net::Twitter::FriendFinder::From::*
from => { Google => {}, Twitter=> {} },
Also if you made your own resource package then set your package name with +.
from => { +My::Resource => { }, },
search
this seach method try to search your friends.
show
display who you find from your criteria.
follow
follow people you find. I recommend that before calling this module , you should check who you are going t follow with show() method.
HOW TO MAKE YOUR OWN RESOURCE
this is just simple one.
package My::Recomend::User;
use strict;
use warnings;
use base qw/Net::Twitter::FriendFinder::From/;
sub search {
return {
'tomyhero' => 100,
'perl' => 30,
};
}
1;
then
my $tw = Net::Twitter::FriendFinder->new({
from => {
+My::Recomend::User => {},
}
});
$tw->search();
$tw->show();
$tw->follow();
SEE ALSO
Net::Twitter::FriendFinder::From::Google
Net::Twitter::FriendFinder::From::Twitter
Net::Twitter::FriendFinder::From::TwitterKensaku
Net::Twitter::FriendFinder::From::TwitterDiff
Net::Twitter::FriendFinder::From::URL
AUTHOR
Tomohiro Teranishi<tomohiro.teranishi@gmail.com>