Net :: mrim.

NET :: MRIM ist eine Perl-Implementierung des Mail.ru Agent-Protokolls.
Jetzt downloaden

Net :: mrim. Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • Alexandre Aufrere
  • Website des Verlags:
  • http://search.cpan.org/~aau/Net-MRIM-1.08/MRIM.pm

Net :: mrim. Stichworte


Net :: mrim. Beschreibung

NET :: MRIM ist eine Perl-Implementierung des Mail.ru Agent-Protokolls. NET :: MRIM ist eine Perl-Implementierung des E-Mail.ru Agent-Protokolls. Dies ist eine Perl-Implementierung des E-Mail.ru Agent-Protokolls, die Spezifikationen unter http://agent.mail.ru/probandocol.htmlsynopSisto erstellen und verbinden An Mrims Server: My $ mrim = net :: mrim-> neu (debug => 0, pollfrequency => 5); $ mrim-> hallo (); zum Anmelden: Wenn (! $ mrim-> login ("login@mail.ru", "password")) {drucken "login ablehnen"; Ausfahrt; } else {drucken "protokolliertes Inn"; } Um einen Benutzer zu ermächtigen: My $ ret = $ mrim-> autorize_user ("friend@mail.ru"); Um einen Benutzer zur Kontaktliste hinzuzufügen (sendet Automatische Auth-Anforderung): $ ret = $ mrim-> add_contact ("Freund) @ mail.ru "); um einen Benutzer aus der Kontaktliste zu entfernen: $ ret = $ mrim-> remove_contact (" friend@mail.ru "); Um eine Nachricht zu senden: $ ret = $ mrim-> send_message (" friend @ mail.ru "," Hallo "); Um den Benutzerstatus zu ändern: $ ret = $ mrim-> change_status (Status); wobei der Status = 0 online und status bedeutet = 1 bedeutet Away-Informationen für einen Kontakt: $ ret = $ mrim- > contact_info ("friend@mail.ru"); Suche nach Benutzern: $ ret = $ mrim-> suche_user (E-Mail, Sex, Land, Online); Wo Sex = (1 | 2), Land finden Sie unter http: //agent.mail.ru/region.txt oder in net :: mrim :: data.pm und online = (0 | 1) Analysieren Sie die Rückgabe der Nachricht: if ($ ret-> is_message ()) {drucken "Von:". $ Ret-> get_from (). "Nachricht:". $ Ret-> get_message (). "N"; } ELSIF ($ ret-> is_server_msg ()) {drucken $ ret-> get_message (). "n"; } Looping, um Nachrichten zu erhalten: Während (1) {Schlaf (1); $ ret = $ mrim-> ping (); if ($ ret-> is_message ()) {drucken "von:". $ ret-> get_from (). "Nachricht:". $ ret-> get_message (). "n"; }} Trennen: $ mrim-> trennen (); Anforderungen: · Perl.


Net :: mrim. Zugehörige Software

Über uns