I got one suggestion: add another layer of abstraction. Put all your DBI stuff into a subclass, like AuthorWeb::DBI. I personally, would reccomend DBI::DWIW, but a straight DBI subclass is fine.

You ought to add the magical AUTOLOAD => \&catch_my_exception, to the run_modes.

You also ought to set tmpl_path in your .cgi

my $app = AuthorWeb->new(
    tmpl_path => 'tmpl', 
);
[download]

Also, saying stuff like

use CGI::Application qw( 2.4 );
use CGI qw( 2.7 );
[download]

might not hurt (i find this to be the most neglected general programming practice amongst folk, cause it works on their system).

Since you're using XML and XSLT, you might wanna migrate to AxKit.

 

______crazyinsomniac_____________________________ Of all the things I've lost, I miss my mind the most. perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.