There is no reason to use Moose or any heavy handedness for this.
The other side of the coin here is that in the script using your module, you may simply use the constructor by calling it in its fully qualified name space.
Once you have your blessed reference, there is no need to export any of the instance methods.
For example the script using your new module would work perfectly fine if you omitted anything having to to with @INC or Exporter in the .pm:
use strict;
use warnings;
use MyClass::A ();
my $s = MyClass::A->new();
$s->serve();
The Perl module simply has do look like the following:
use strict;
use warnings
package MyClass::A;
sub new {
my $pkg = shift;
my $self = {};
return bless $self, $pkg;
}
sub serve {
my $self = shift;
# .. do whatevs
}
1;
In the past Exporter was used to make it more convenient to load subroutines for use without having to deal with namespaces, but as it turns out using fully qualified namespaces is a really great thing to do. If you create a simple object via module using "traditional" Perl OOP, then you only have to type out the namespace once during construction. After that, the fact that the instance variable is blessed with the namespace means that you don't have to keep telling Perl what to use.
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: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.