/ domm

I hack Perl for fun and
profit.

Follow me on twitter!
... on Atom!

26.01.2006: CPANTS news
09.01.2006: Secret messages in YAPC::Europe city names
07.01.2006: Shut down the Internet
04.01.2006: laser in my nose
16.12.2005: Perl interface to Philips GoGear mp3 player

16.12.2005: "fun" job

Somebody approached me to rescue a very late project. It should be done today, I got on board yesterday...

But only today I took a first real look at the code. It features:

• self written CGI param parser
• self written templating system
• self written DB (mini) abstraction
• one very big if-elsif-block as a "dispatcher"
• it's plain CGI
• aprox. 30 different templates, all with the same header stuff inlined (but some digging in the code revealed some include-like functionality)
• the templating system only recognises commands if they begin in the first column of the line
• and probably some more niceties

The project is low budget and on a thight schedule, so I'll fight my urge to rewrite everything and stick with this mid-90s retro code. At least they use strict (if only 'vars')...

Original: http://use.perl.org/~domm/journal/28024

Comments (via disqus)

01.12.2005: Hoover Voodoo
28.11.2005: Changes
14.11.2005: We moved!
24.09.2005: More jobs than time