beautiful - exactly what I want.

Spent most of the night reading the camel, the cookbook and the damian - finally found it in appendix A (p430) of the damian - package lexicals aren't visble, but a method returning them is - which means I need to defined a sub pattern {} in every derived class that redefines the class variable - which is a little messy.

This whole question came about as a result of refactoring an existing class hierarchy, and removing lots of duplicated code in each derived class. And having made it all clean, now every class that redefines the pattern neeeds a method, thats exactly the same as the base and other derived class methods, that returns the pattern.

Maybe I need a deep think. I dont want to use constructors in the derived class', and call SUPER::new, then put pattern into the blessed hash. Maybe the derived class' that redefine the pattern can have a sub _redefine_pattern, that the constructor in the base class calls - we should check that the derived class has the method first via an ->can() call?

Or should I add @EXPORT = ($PATTERN); to the derived modules (evil in an OO module ;-) )

In reply to Re: Re: class constants in derived classes by leriksen
in thread class constants in derived classes by leriksen

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.