perl sockets

[moshe12007]

hi
i want to connect to my facebook with perl i just start now to programming in perl before perl i programming in C.
i see several codes but all the codes not work!!!

i want to connect to my facebook and to my msn messanger.
very important that i try only to connect .
the code for began what i try to do it :

#!/usr/local/bin/perl
use IO::Socket;
my $Server = "http://www.facebook.com:80";
my $Port =  "80";
my $UserName = "blabla";
my $Password = "blabla";

here i block "what to do now??"
please help me.