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, ...
perl -e "s>>*F>e=>y)\*martinF)stronat)=>print,print v220.127.116.11.11.32"