NAME

MooseX::Q4MLog - Log Data To Q4M

SYNOPSIS

package MyObject;
use Moose;

with 'MooseX::Q4MLog';

no Moose;

sub format_q4mlog {
  my ($self, %args) = @_; # %args is application dependent

  # create a hash that can be passed to Queue::Q4M->insert
  my %q4m_args = ( .... );

  return \%q4m_args
}

my $obj = MyObject->new(
  q4mlog => {
    table => 'q_log', # optional
    connect_info => [ ... ],
  }
);
$obj->log( %whatever );

METHODS

format_q4mlog(%args)

Given the arguments, you must create a hash that can be passed to Queue::Q4M->insert

log(%args)