NAME

Net::Jabber::X::Encrypted - Jabber X Encrypted Module

SYNOPSIS

Net::Jabber::X::Encrypted is a companion to the Net::Jabber::X module.
It provides the user a simple interface to set and retrieve all 
parts of a Jabber X Encrypted.

DESCRIPTION

  To initialize the Encrypted with a Jabber <x/> you must pass it the 
  XML::Parser Tree array from the module trying to access the <x/>.  
  In the callback function:

    use Net::Jabber;

    sub iq {
      my $foo = new Net::Jabber::Foo(@_);

      my @xTags = $foo->GetX("jabber:x:encrypted");

      my $xTag;
      foreach $xTag (@xTags) {
	$xTag->....
	
      }
      .
      .
      .
    }

  You now have access to all of the retrieval functions available.

  To create a new Encrypted to send to the server:

    use Net::Jabber;

    $foo = new Net::Jabber::Foo();
    $x = $foo->NewX("jabber:x:encrypted");

  Now you can call the creation functions below.

  For more information about the array format being passed to the CallBack
  please read the Net::Jabber::Client documentation.

Retrieval functions

$message = $xTag->GetMessage();

Creation functions

$xTag->SetEncrypted(message=>data);

$xTag->SetMessage(data);

METHODS

Retrieval functions

GetMessage() - returns a string with the message data.

Creation functions

SetEncrypted(message=>string) - set multiple fields in the <x/> at one
                                time.  This is a cumulative and over
                                writing action.  If you set the 
                                "message" data twice, the second 
                                setting is what is used.  If you set the
                                message, and then set another field 
                                then both will be in the <x/> tag.  For 
                                valid settings read the specific Set 
                                functions below.

SetMessage(string) - sets the data for the message.

AUTHOR

By Ryan Eatmon in December of 2000 for http://jabber.org..

COPYRIGHT

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.