sub end : Private {
my ( $self, $c ) = @_;
- die "testing";
+ die "forced debug";
}
If you're tired of removing and adding this all the time, you
can easily add a condition. For example:
- die "Testing" if $c->params->{dump_info};
+ die "force debug" if $c->req->params->{dump_info};
=head2 Disable statistics
And this is all you need to do.
+=head2 Pass-through login (and other actions)
+
+An easy way of having assorted actions that occur during the processing of
+a request that are orthogonal to its actual purpose - logins, silent
+commands etc. Provide actions for these, but when they're required for
+something else fill e.g. a form variable __login and have a sub begin like so:
+
+sub begin : Private {
+ my ($self, $c) = @_;
+ foreach my $action (qw/login docommand foo bar whatever/) {
+ if ($c->req->params->{"__${action}"}) {
+ $c->forward($action);
+ }
+ }
+}
=head2 How to use Catalyst without mod_perl
For more information see the FastCGI documentation, the C<FCGI> module
and L<http://www.fastcgi.com/>.
+=head1 Forwarding with a parameter
+
+Sometimes you want to pass along arguments when forwarding to another
+action. This can easily be accomplished like this:
+
+ $c->req->args([qw/arg1 arg2 arg3/]);
+ $c->forward('/wherever');
+
=head1 AUTHOR
Sebastian Riedel, C<sri@oook.de>