PDA

Visualizza la versione completa : [perl] Mandare un messaggio ad utente facebook


Graziano
08-12-2010, 12:57
Salve ha tutti ho un problema,
dato che quando mando delle email ai miei collaboratori spesso vengono lette in ritardo, mentre i messaggi che gli invio tramite facebook vengono letti subito, ho bisogno che alcuni miei script perl cgi gli inviino un messaggio tramite facebook.
E' possibile?
Credo di si, ho trovato qualcosa su cpan (un modulo facebook API) ma non sono molto pratico con i moduli e non capisco come utilizzarli.
attualmente utilizzo questo sistema per inviare le email:

use Net::SMTP;
$smtp = Net::SMTP->new("$serverSMTP", Timeout => 50);
$smtp->mail("$adminmail");
$smtp->to("$email");
$smtp->data();
$smtp->datasend("To: <$email>\n");
$smtp->datasend("From: <$adminmail>\n");
$smtp->datasend("Subject: \n");
$smtp->datasend("\n");
$smtp->datasend("$messaggio");
$smtp->dataend();
$smtp->quit;



esiste un equivalente per inviare un messaggio ai loro accaunt facebook ?
Grazie

Loading