This is very simple.
Perl will automagically pass the object as the first argument to the subroutine if you use one of the method invocation syntaxes.
When you say private method, what exactly do you mean btw? There is only one way that I know of to *enforce* private methods which is to make a lexical reference in the package to the subroutine. Once within a public method, the private method is visible and callable via method invocation.
Back to your question. When calling a private method from a public method, just call like:
sub public_method {
my $object = shift;
$object->private_method;
}
sub private_method {
my $object = shift;
...
}
Basically, unless you create a lexical variable that contains a CODE ref, there is no way to really create and enforce a private method that I know of. This is by design BTW. Perl wisdom says that you shouldn't need a shotgun to keep people out of your living room. Thus your private methods are just conventions based on name normally. Like sub __private_method {};
rr
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|