Net::XMPP::Message(3pm) User Contributed Perl Documentation NAME Net::XMPP::Message - XMPP Message Module SYNOPSIS Net::XMPP::Message is a companion to the Net::XMPP module. It provides the user a simple interface to set and retrieve all parts of an XMPP Message. DESCRIPTION A Net::XMPP::Message object is passed to the callback function for the message. Also, the first argument to the callback functions is the session ID from XML::Stream. There are some cases where you might want thisinformation, like if you created a Client that connects to two servers at once, or for writing a mini server. use Net::XMPP; sub message { my ($sid,$Mess) = @_; . . . } You now have access to all of the retrieval functions available. To create a new message to send to the server: use Net::XMPP; $Mess = Net::XMPP::Message->new(); Now you can call the creation functions below to populate the tag before sending it. METHODS Retrieval functions GetTo() - returns the value in the to='' attribute for the GetTo("jid") . If you specify "jid" as an argument then a Net::XMPP::JID object is returned and you can easily parse the parts of the JID. $to = $Mess->GetTo(); $toJID = $Mess->GetTo("jid"); GetFrom() - returns the value in the from='' attribute for the GetFrom("jid") . If you specify "jid" as an argument then a Net::XMPP::JID object is returned and you can easily parse the parts of the JID. $from = $Mess->GetFrom(); $fromJID = $Mess->GetFrom("jid"); GetType() - returns the type='' attribute of the . Each message is one of four types: normal regular message (default if type is blank) chat one on one chat groupchat multi-person chat headline headline error error message $type = $Mess->GetType(); GetSubject() - returns the data in the tag. $subject = $Mess->GetSubject(); GetBody() - returns the data in the tag. $body = $Mess->GetBody(); GetThread() - returns the data in the tag. $thread = $Mess->GetThread(); GetError() - returns a string with the data of the tag. $error = $Mess->GetError(); GetErrorCode() - returns a string with the code='' attribute of the tag. $errCode = $Mess->GetErrorCode(); GetTimeStamp() - returns a string that represents the time this message object was created (and probably received) for sending to the client. If there is a jabber:x:delay tag then that time is used to show when the message was sent. $date = $Mess->GetTimeStamp(); Creation functions SetMessage(to=>string|JID, - set multiple fields in the from=>string|JID, at one time. This is a cumulative type=>string, and over writing action. If you set subject=>string, the "to" attribute twice, the second body=>string, setting is what is used. If you set thread=>string, the subject, and then set the body errorcode=>string, then both will be in the error=>string) tag. For valid settings read the specific Set functions below. $Mess->SetMessage(TO=>"bob\@jabber.org", Subject=>"Lunch", BoDy=>"Let's do lunch!"); $Mess->SetMessage(to=>"bob\@jabber.org", from=>"jabber.org", errorcode=>404, error=>"Not found"); SetTo(string) - sets the to='' attribute. You can either pass SetTo(JID) a string or a JID object. They must be valid JIDs or the server will return an error message. (ie. bob@jabber.org/Work) $Mess->SetTo("test\@jabber.org"); SetFrom(string) - sets the from='' attribute. You can either pass SetFrom(JID) a string or a JID object. They must be valid JIDs or the server will return an error message. (ie. jabber:bob@jabber.org/Work) This field is not required if you are writing a Client since the server will put the JID of your connection in there to prevent spamming. $Mess->SetFrom("me\@jabber.org"); SetType(string) - sets the type attribute. Valid settings are: normal regular message (default if blank) chat one one one chat style message groupchat multi-person chatroom message headline news headline, stock ticker, etc... error error message $Mess->SetType("groupchat"); SetSubject(string) - sets the subject of the . $Mess->SetSubject("This is a test"); SetBody(string) - sets the body of the . $Mess->SetBody("To be or not to be..."); SetThread(string) - sets the thread of the . You should copy this out of the message being replied to so that the thread is maintained. $Mess->SetThread("AE912B3"); SetErrorCode(string) - sets the error code of the . $Mess->SetErrorCode(403); SetError(string) - sets the error string of the . $Mess->SetError("Permission Denied"); Reply(hash) - creates a new Message object and populates the to/from, and the subject by putting "re: " in front. If you specify a hash the same as with SetMessage then those values will override the Reply values. $Reply = $Mess->Reply(); $Reply = $Mess->Reply(type=>"chat"); Removal functions RemoveTo() - removes the to attribute from the . $Mess->RemoveTo(); RemoveFrom() - removes the from attribute from the . $Mess->RemoveFrom(); RemoveType() - removes the type attribute from the . $Mess->RemoveType(); RemoveSubject() - removes the element from the . $Mess->RemoveSubject(); RemoveBody() - removes the element from the . $Mess->RemoveBody(); RemoveThread() - removes the element from the . $Mess->RemoveThread(); RemoveError() - removes the element from the . $Mess->RemoveError(); RemoveErrorCode() - removes the code attribute from the element in the . $Mess->RemoveErrorCode(); Test functions DefinedTo() - returns 1 if the to attribute is defined in the , 0 otherwise. $test = $Mess->DefinedTo(); DefinedFrom() - returns 1 if the from attribute is defined in the , 0 otherwise. $test = $Mess->DefinedFrom(); DefinedType() - returns 1 if the type attribute is defined in the , 0 otherwise. $test = $Mess->DefinedType(); DefinedSubject() - returns 1 if is defined in the , 0 otherwise. $test = $Mess->DefinedSubject(); DefinedBody() - returns 1 if is defined in the , 0 otherwise. $test = $Mess->DefinedBody(); DefinedThread() - returns 1 if is defined in the , 0 otherwise. $test = $Mess->DefinedThread(); DefinedErrorCode() - returns 1 if is defined in the , 0 otherwise. $test = $Mess->DefinedErrorCode(); DefinedError() - returns 1 if the code attribute is defined in the , 0 otherwise. $test = $Mess->DefinedError(); AUTHOR Originally authored by Ryan Eatmon. Previously maintained by Eric Hacker. Currently maintained by Darian Anthony Patrick. COPYRIGHT This module is free software, you can redistribute it and/or modify it under the LGPL 2.1. perl v5.40.0 2024-09-01 Net::XMPP::Message(3pm)