Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Re: Name spaces and Perl::Tk coding style

by strat (Canon)
on Oct 06, 2005 at 07:35 UTC ( #497839=note: print w/ replies, xml ) Need Help??


in reply to Name spaces and Perl::Tk coding style

For my Tk-Apps, I often use package/module names like (if my App is called MyApp):

  • MyApp::Widgets: little wrapper around widgets with some defaults (e.g. background, font, ...) to be able to get a flexible layout and shorter widget calls. Some enhanced widgets (e.g. with Tk::Derived) may be specified here as well if the code is short, although then there is more than one package in a module...
  • MyApp::Forms: most of the GUI functionality is coded here to separate layout and code as far as possible
  • MyApp::Callbacks: callbacks are specified here; if necessary, there even may be more modules grouped by topic)
  • MyApp::DB: the interface to Databases, or MyApp::LDAP as interface to Directory Services, ... so I don't need to search through the whole program if the interface changes
  • maybe MyApp::Config: this sometimes contains the configuration in global package variables which I treat as readonly, sometimes as configuration objects or an interface to an external configuration
  • sometimes MyApp::Global for saving global variables like $Mw, $ToplevelEdit, ...

Best regards,
perl -e "s>>*F>e=>y)\*martinF)stronat)=>print,print v8.8.8.32.11.32"


Comment on Re: Name spaces and Perl::Tk coding style

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (12)
As of 2015-07-28 21:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (259 votes), past polls