Gaim::Log::Message - Represents a logged Gaim message
use Gaim::Log::Message;
my $msg = Gaim::Log::Message->new(
from => $from,
to => $to,
date => $date,
content => $content,
);
print $msg->as_string(), "\n";
Helper class to represent a gaim log message. The following accessors are available:
from()
User ID the message was sent from.
to()
User ID the message was sent to.
date()
Date in epoch seconds.
content()
Content of the message.
as_string()
Format all messages fields (from, to, date, content) and return the result as a string.
Copyright 2005 by Mike Schilli, all rights reserved. This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.
2005, Mike Schilli <cpan@perlmeister.com>