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

(jeffa) Re: Are design patterns worth it?

by jeffa (Bishop)
on Aug 28, 2002 at 03:06 UTC ( #193344=note: print w/replies, xml ) Need Help??

in reply to Are design patterns worth it?

I studied C++ and the GoF book long before i embarked upon the Perl path. At some point during my journey down the Perl path, i thought it would be really neat if someone (me) wrote Perl versions of each of the GoF Patterns. Well, someone already did (partially) - But, there is a funny thing about Perl - read Dominus's "Design Patterns" Aren't for more.

I personally think that Design Patterns are worthy of studying, they can really help you design better. There are real world examples of Design Patterns implemented in Perl, such as what Matts discusses at his paper on Proxy Objects. There are plenty of other examples here at this site, such as a Factory Pattern that i demonstrated a while back (be sure and read Kanji's and merlyn's comments from the root thread as well if you do follow that link). Just try the new and improved Super Search (tye++ once again).

Now, are Design Patterns going to reverse the Big Ball of Mud for you. No, only you, your co-workers, a lot of planning, and time can do that, but that doesn't mean that you shouldn't learn how a few patterns work. You never know when they might be useful. I wish you the best of luck, i myself have been handed a medium sized ball of mud (written in ASP and VBA for Access, no less) that someone else wrote. Right now, the most critical piece to shaping this lump into a more manageable product is to clean up the database schema - to bad the GoF didn't invent a Preventative LART Pattern*. I can't complain though, it is nice to be employed again. :)


* prevents non-coders from thinking they can
  • Comment on (jeffa) Re: Are design patterns worth it?

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://193344]
[ovedpo15]: can't I use just use lib $FindBin::Bin/../ bin" asuming that p2 is in ./bin and p1 is in /config? it says "cant find" altought p2 is
[moritz]: ovedpo15 "use lib" is only for .pm files
[moritz]: if you don't have .pm file, you might to use "require" or "do" with an absolute path
[ovedpo15]: I need to use FindBin thought. does FindBin finds only modules? or it can find perl script also?
[moritz]: maybe you should start looking at the documentation of FindBin?

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (6)
As of 2018-03-17 20:47 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (226 votes). Check out past polls.