Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re^3: OO best practice basic questions

by Anonymous Monk
on Aug 27, 2014 at 14:55 UTC ( [id://1098755]=note: print w/replies, xml ) Need Help??


in reply to Re^2: OO best practice basic questions
in thread OO best practice basic questions

What do you mean by individual accessors? Do you mean actually have a separate method for each field like "dump_num1"?

Yes, although I wouldn't name it that :-) Here's an example of a common, simple implementation:

sub num1 { my $self = shift; $self->{num1} = shift if @_; return $self->{num1}; }

That'll let you get the current value with $oo->num1 and set a value with $oo->num1(123);

And i'm not totally familiar with modules/packages.

Your file Numbers.pm would start with package Numbers; use warnings; use strict; and end with 1; (the file needs to return a true value), and then the normal way to include it would be via use Numbers; - that's it. @INC includes the current working directory ., so initially you wouldn't need to change @INC at all if all your files are in the same directory. Later on, once you get into actually building a real library, you can deal with @INC - see for example lib or the -I switch.

Replies are listed 'Best First'.
Re^4: OO best practice basic questions
by Amblikai (Scribe) on Aug 28, 2014 at 10:02 UTC

    Thanks! I've put my package/class in a separate file now. That's more than enough for now really.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1098755]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others surveying the Monastery: (4)
As of 2024-04-24 20:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found