Added recursive -r flag to prove example
[catagits/Catalyst-Runtime.git] / lib / Catalyst / Engine / FastCGI.pm
CommitLineData
d1d9793f 1package Catalyst::Engine::FastCGI;
ffb41d94 2
3use strict;
d1d9793f 4use base qw(Catalyst::Engine::FastCGI::Base Catalyst::Engine::CGI);
ffb41d94 5
6=head1 NAME
7
d1d9793f 8Catalyst::Engine::FastCGI - Catalyst FastCGI Engine
ffb41d94 9
10=head1 SYNOPSIS
11
d1d9793f 12A script using the Catalyst::Engine::FastCGI module might look like:
c9afa5fc 13
14 #!/usr/bin/perl -w
15
16 BEGIN {
d1d9793f 17 $ENV{CATALYST_ENGINE} = 'FastCGI';
c9afa5fc 18 }
19
20 use strict;
21 use lib '/path/to/MyApp/lib';
22 use MyApp;
23
24 MyApp->run;
ffb41d94 25
26=head1 DESCRIPTION
27
28This is the Catalyst engine for FastCGI.
29
e2fd5b5f 30=head1 OVERLOADED METHODS
31
566ee5d7 32This class overloads some methods from C<Catalyst::Engine::FastCGI::Base>
33and C<Catalyst::Engine::CGI>.
e2fd5b5f 34
35=over 4
36
37=item $c->prepare_body
38
39=cut
40
41sub prepare_body {
42 shift->Catalyst::Engine::CGI::prepare_body(@_);
43}
44
45=item $c->prepare_parameters
46
47=cut
48
49sub prepare_parameters {
50 shift->Catalyst::Engine::CGI::prepare_parameters(@_);
51}
52
53=item $c->prepare_request
54
55=cut
56
57sub prepare_request {
895b2303 58 my ( $c, $request, @arguments ) = @_;
316bf0f0 59 CGI::_reset_globals();
895b2303 60 $c->SUPER::prepare_request($request);
e2fd5b5f 61 $c->Catalyst::Engine::CGI::prepare_request(@arguments);
62}
63
64=item $c->prepare_uploads
65
66=cut
67
68sub prepare_uploads {
69 shift->Catalyst::Engine::CGI::prepare_uploads(@_);
70}
71
cd3bb248 72=back
73
ffb41d94 74=head1 SEE ALSO
75
e2fd5b5f 76L<Catalyst>, L<Catalyst::Engine::FastCGI::Base>, L<Catalyst::Engine::CGI>.
ffb41d94 77
78=head1 AUTHOR
79
80Sebastian Riedel, C<sri@cpan.org>
c2e8e6fa 81Christian Hansen, C<ch@ngmedia.com>
ffb41d94 82
83=head1 COPYRIGHT
84
85This program is free software, you can redistribute it and/or modify it under
86the same terms as Perl itself.
87
88=cut
89
901;