# config

private => 1,
verbose => 1,
tag     => 'MIXED',
level   => 'log',
remove  => 1,
chrono  => 1,

##</code><code>##

#!/usr/bin/perl -l

use strict;
use warnings;
use Log::Message;
use Data::Dumper::Concise;

my $log = Log::Message->new(
    config => '/path/to/config',
    tag    => 'MIXED',
    level  => 'log',
);
$log->store('This is the first test');
$log->store('This is the second test');

my @items = $log->retrieve(2);
print Dumper(@items);