NET :: MRIM

NET :: MRIM is een PERL-implementatie van Mail.ru Agent-protocol.
Download nu

NET :: MRIM Rangschikking & Samenvatting

Advertentie

  • Rating:
  • Vergunning:
  • Perl Artistic License
  • Prijs:
  • FREE
  • Naam uitgever:
  • Alexandre Aufrere
  • Uitgever website:
  • http://search.cpan.org/~aau/Net-MRIM-1.08/MRIM.pm

NET :: MRIM Tags


NET :: MRIM Beschrijving

NET: MRIM is een PERL-implementatie van Mail.ru Agent-protocol. NET :: MRIM is een PERL-implementatie van Mail.ru Agent Protocol.Dit is een PERL-implementatie van het Mail.ru-agentprotocol, welke specificaties te vinden zijn op http://agent.mail.ru/protocol.htmlsynopsisto Construct and Connect Aan Mrim's Servers: mijn $ Mrim = NET :: Mrim-> Nieuw (debug => 0, pollfrequentie => 5); $ mrim-> hallo (); om in te loggen: if (! $ mrim-> login ("login@mail.ru", "wachtwoord")) {print "login afgewezen"; Uitgang; } anders {print "Logged Inn"; } Om een gebruiker te autoriseren: mijn $ RET = $ MRIM-> Authorize_User ("friend@mail.ru"); om een gebruiker toe te voegen om contact op te nemen (verzendt automatisch verzenden): $ RET = $ MRIM-> ADD_CONTACT ("Vriend @ mail.ru "); om een gebruiker uit contactlijst te verwijderen: $ RET = $ MRIM-> Verwijderen_Contact (" friend@mail.ru "); om een bericht te verzenden: $ RET = $ MRIM-> Send_Message (" Friend @ Mail.ru "," Hallo "); om de gebruikersstatus te wijzigen: $ RET = $ MRIM-> Wijziging_status (status); waar status = 0 betekent online en status = 1 betekent Weggetin-informatie voor een contactpunt: $ RET = $ MRIM- > Contact_info ("friend@mail.ru"); Zoeken naar gebruikers: $ RET = $ mrim-> search_user (e-mail, seks, land, online); waar seks = (1 | 2), land is te vinden op http: //agent.mail.ru/region.txt of in NET :: Mrim :: Data.pm en online = (0 | 1) Analyseer de terugkeer van het bericht: if ($ RET-> IS_MESSAGE ()) {Print "Van:". $ RET-> GET_FROM (). "BERICHT:". $ RET-> GET_MESSAGE (). "N"; } Elsif ($ RET-> IS_SERVER_MSG ()) {Print $ RET-> GET_MESSAGE (). "N"; } Looping om berichten te krijgen: terwijl (1) {SLEEP (1); $ RET = $ MRIM-> PING (); if ($ RET-> IS_MESSAGE ()) {Print "van:". $ RET-> GET_FROM (). "BERICHT:". $ RET-> GET_MESSAGE (). "N"; }} Ontkoppelen: $ Mrim-> Disconnect (); Vereisten: · Perl


NET :: MRIM Gerelateerde software