[% c.log.debug("This is a test log message") %]
-As with many other logging facilities, you a method is defined for
+As with many other logging facilities, a method is defined for
each of the following "logging levels" (in increasing order of
severity/importance):
"left-justify" my debug statements so I don't forget to remove them, but
you can obviously indent them if you prefer):
- sub list : Local {
+ sub list :Local {
# Retrieve the usual Perl OO '$self' for this object. $c is the Catalyst
# 'Context' that's used to 'glue together' the various components
# that make up the application
my ($self, $c) = @_;
$DB::single=1;
-
+
# Retrieve all of the book records as book model objects and store in the
# stash where they can be accessed by the TT template
$c->stash->{books} = [$c->model('DB::Book')->all];