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

Re: Setting up helper objects in App::Cmd

by tobyink (Abbot)
on Sep 25, 2012 at 10:21 UTC ( #995523=note: print w/ replies, xml ) Need Help??


in reply to Setting up helper objects in App::Cmd

I'd generally name my modules things like:

  • MyApp::Command::Foo
  • MyApp::Command::Bar
  • MyApp::Lib::Foobar
  • MyApp::Lib::Database

And instead of loading library modules at compile time with use MyApp::Lib::Database, defer loading to run-time (with require MyApp::Lib::Database) inside your command's execute method. This means that you can avoid loading up database connections, etc when the user is just running, say, myapp help. Load them only once they're needed.

PS: a release using this technique is P5U.

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'


Comment on Re: Setting up helper objects in App::Cmd
Select or Download Code
Re^2: Setting up helper objects in App::Cmd
by McA (Curate) on Sep 25, 2012 at 11:22 UTC

    Hi Tobyink!

    Once again thank you for your reply. A ++ for that.

    When I need to do some module initialization for EVERY command. Is there a place/method to do so? Especially when I do initialization work based on the global options. I don't like the idea of doing the same thing, like

    require SomeLib; SomeLib->init();
    in every command's execute method.

    Best regards
    McA

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (5)
As of 2014-08-31 07:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (294 votes), past polls