Hail the Monks of Perl!

I'm working with some objects in Moose. I have one object that has several others. Lets say I've got an Examiner who runs everything, a number of Tests that I run and a bunch of Actions that I take when the Tests fail. The Tests and Actions all belong to the Examiner, if you follow me. Each of these classes takes a Log::Dispatcher object. I want them all to have the same Log::Dispatcher object.

The idea would be that I can set up my Log::Dispatcher in the Examiner and have my logging calls work appropriately in all my Tests and Actions.

Right now, I have my Examiner generate the Log::Log::Dispatcher and each time I create a Test or Action I assign the Dispatcher like so:

# inside fictional Examiner class
$self->add_test(MyTest->new( dispatcher => $self->dispatcher ));
$self->dispatcher->notice("I just added a test");
...
#inside fictional MyTest class
$self->dispatcher->warn("this example is silly!");

[download]

This feels cumbersome to me. I also feel a little funny that if I replace the Log::Dispatcher in the Examiner, the Tests and Actions will all still have the old one.

I'm hoping there is an established pattern to handle this and I'm going to slap myself in the forehead when one of you tells me about it.

Much Thanks!

--Pileofrogs

In reply to Best way to share logging object among multiple objects? by pileofrogs

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.