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

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."

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

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://497839]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (4)
As of 2018-01-16 13:38 GMT
Find Nodes?
    Voting Booth?
    How did you see in the new year?

    Results (179 votes). Check out past polls.