#===========================================================================
Copyright (C) 2007 by Nik Ogura. All rights reserved.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Bug reports and comments to nik.ogura@gmail.com.
CGI::Lazy
use CGI::Lazy; our $q = CGI::Lazy->new({ tmplDir => "/templates", jsDir => "/js", plugins => { mod_perl => { PerlHandler => "ModPerl::Registry", saveOnCleanup => 1, }, ajax => 1, dbh => { dbDatasource => "dbi:mysql:somedatabase:localhost", dbUser => "dbuser", dbPasswd => "letmein", dbArgs => {"RaiseError" => 1}, }, session => { sessionTable => 'SessionData', sessionCookie => 'frobnostication', saveOnDestroy => 1, expires => '+15m', }, }, }); print $q->header, $q->start_html({-style => {-src => '/css/style.css'}}), $q->javascript->modules(); print $q->template('topbanner2.tmpl')->process({ logo => '/images/funkyimage.png', mainTitle => 'Funktastic', secondaryTitle => $message, versionTitle => '0.0.1', messageTitle => 'w00t!', }); print $q->template('navbar1.tmpl')->process({ one => 'link one', one_link => '/blah.html', two => 'link two', two_link => '/blah.html', three => 'link three', three_link => '/blah.html', four => 'link four', four_link => '/blah.html', }); print $q->template('fileMonkeyHelp.tmpl')->process({helpMessage => 'help text here'}); print $q->template('fileMonkeyMain.tmpl')->process({mainmessage => "session info: <br> name: ".$q->session->data->name . "<br> time: ".$q->session->data->time}); print $q->template('footer1.tmpl')->process({version => $q->lazyversion});
CGI::Lazy was designed to simply abstract some of the more common cgi scripting tasks because the author finally got sick of writing the same code by hand for every new site or client that comes along. It is my attemp to extend the wonderful CGI.pm with things that just about every modern website needs or wants, and to do it in a fairly portable manner.
There are plenty of webdev frameworks out there, many are far more full- featured. Often these solutions are so monstrous that they are overkill for small apps, or so optimized that they require full admin rights on the server they run on. CGI::Lazy was intended to be lightweight enough to run on any given server that could run perl cgis. Of course, the more power you have, the fancier you will be able to get, so Lazy was written to be extensible and to (hopefully) play nice with whatever magic you have up your sleeve.
Lazy has also been written to be useful in a mod_perl environment if that is your pleasure. The wonders of persistence and namespaces have been (again, hopefully) all accounted for. It should plug into your mod_perl environment with little or no fuss.
For the most part, CGI::Lazy is simply a subclass of CGI::Pretty, which is an easier to read version of CGI.pm.
We need to use CGI::Pretty due to a css issue in IE where the style definitions aren't always followed unless there is the appropriate amount of whitespace between html tags. Luckilly, CGI::Pretty takes care of this pretty transparently, and it's output is easier to read and debug.
CGI::Lazy adds a bunch of hooks in the interest of not working any harder than we need to, otherwise it's a CGI::Pretty object.
Probably 80% of the apps the author has been asked to write have been front ends to some sort of database, so that's definitely the angle Lazy is coming from. It works just fine with no db, but most of the fancy work is unavailable.
Output to the web is intended to be through templates via HTML::Template. However, if you want to write your content into the code manually, we won't stop you. Again, the whole point was to be flexible and reusable, and to spend our time writing new stuff, not the same old crap over and over again.
The CGI::Lazy::Ajax::Dataset module especially was written to bring spreadsheet-like access to a database table to the web in a fairly transparent manner- after all, most of the time you're doing one of 4 operations on a database: select, insert, update, delete. The Dataset is, at least at the time of the original writing, the crown jewel of the Lazy framework.
In any event, it is my hope that this is useful to you. It has saved me quite alot of work. I hope that it can do the same for you. Bug reports and comments are always welcome.
returns the CGI::Lazy::Ajax object
returns CGI::Lazy::Javascript object.
see CGI::Lazy::Javascript for details.
Method retrieves CGI::Lazy::Config object for configuration variable retrieval See CGI::Lazy::Config for details
Method retrieves the database object CGI::Lazy::DB. The db object contains convenience methods for database access, and will contain the default database handle for the object.
Retrieves dbh from db object for use in cgi. Convenience method. Same as $q->db->dbh.
Returns the CGI::Lazy::ErrorHandler object. ErrorHandler contains convenience methods for trapping and returning error codes without generating a pesky 500 error.
Creates standard http header. Passes all arguments to CGI::Pretty::header, simply adding our own goodness to it in passing.
normal header args
Wraps javascript text in script tags and html comments for output to the browser. Pretty much the same as $q->script, but it comment wraps the script contents.
javascript text to output to the browser.
Returns mod_perl object if plugin is enabled.
See CGI::Lazy::ModPerl for details
Constructor. Creates the instance of the CGI::Lazy object.
If args is a hashref, it will assume that the hash is the config.
If it's just a string, it's assumed to be the absolute path to the config file for the Lazy object. That file will be parsed as JSON.
returns version of CGI::Lazy.
Returns plugin object.
see CGI::Lazy::Plugin for details.
Returns the session object see CGI::Lazy::Session for details.
Returns CGI::Lazy::Template object, or if it hasn't been created yet, creates it and returns it.
See CGI::Lazy::Template for details.
Returns CGI::Lazy::Utility object
See CGI::Lazy::Utility for details.
Returns hashref to the variables used in creating the object.
To install CGI::Lazy, copy and paste the appropriate command in to your terminal.
cpanm
cpanm CGI::Lazy
CPAN shell
perl -MCPAN -e shell install CGI::Lazy
For more information on module installation, please visit the detailed CPAN module installation guide.