Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re^2: Possibly Stupid OOP question

by talwyn (Monk)
on Feb 27, 2008 at 00:38 UTC ( [id://670447]=note: print w/replies, xml ) Need Help??


in reply to Re: Possibly Stupid OOP question
in thread Possibly Stupid OOP question

ok ... if the package isn't declared ( top part of the code ) then its automagically in Main:: isn't it?

If so, package ticket and STRTicket both follow package main. I generally like the core of my program at the top of the source file and refer to sub below. Until now it has always worked. Am I missing your point?

Replies are listed 'Best First'.
Re^3: Possibly Stupid OOP question
by runrig (Abbot) on Feb 27, 2008 at 00:43 UTC
    @ISA = ... is just an assignment. It's not happening until AFTER your call to new(). So there is no inheritance until AFTER all of your packages. Perhaps putting each of the @ISA=...'s in BEGIN{...} blocks will work. (Maybe putting all of the packages in one big BEGIN {...} block will work? Update: Yes, it does seem to work).

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others chilling in the Monastery: (5)
As of 2024-03-29 02:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found