!getid <FACEBOOK USERNAME/UID>"
[09:06:43] !getid woolva
Facebook ID TCL Script adapted by Denver Freeburn of JimpWare. Originally coded by Frederik
Link of the post http://www.hawkee.com/snippet/8898/
Any quesion
server irc.chat1080.com 6667
chan #chat1080
package require http
#############################
bind pub - !getid proc:fbid
proc proc:fbid {nick uhost hand chan arg} {
set tok [http::geturl http://graph.facebook.com/$arg]
set data [http::data $tok]
regexp -nocase {"id":"(.*?)",} $data -> fbogid
regexp -nocase {"name":"(.*?)",} $data -> fbogname
http::cleanup $tok
putserv "PRIVMSG $chan :01\[04FaceBook Info\]: >>> 01\[04FaceBook Name\]: $fbogname >>> 1\[04ID\]: $fbogid"
putserv "PRIVMSG $chan :01\[04FaceBook Link\]: http:\/\/www.facebook.com\/profile.php?id=$fbogid"
}
##############################
# ----------
putlog "Facebook ID TCL Script adapted by Denver Freeburn of JimpWare, for Frederik Originally coded by Jethro"
# ----------
1 question , is this base on irc nickname to get the Facebook Id even if that nickname not mentioned on their Facebook .
I use Sugali as my nickname on Irc , but i did not put it on my Facbook profile or anywhere else related to facebook ,
is this possible this tcl will get the Facebook id ?
BTW , i will check it out and try on my eggdrop . Thank you so much .
I made simulat snippet for grabing infos from facebook pictures links http://www.hawkee.com/snippet/9378/