Webpacus/script/webpacus_cgi.pl

#!/usr/bin/perl -w

BEGIN { $ENV{CATALYST_ENGINE} ||= 'CGI' }

use strict;
use FindBin;
use lib "$FindBin::Bin/../lib";
use Webpacus;

Webpacus->run;

1;

=head1 NAME

webpacus_cgi.pl - Catalyst CGI

=head1 SYNOPSIS

See L<Catalyst::Manual>

=head1 DESCRIPTION

Run a Catalyst application as cgi.

=head1 AUTHOR

Sebastian Riedel, C<sri@oook.de>

=head1 COPYRIGHT

Copyright 2004 Sebastian Riedel. All rights reserved.

This library is free software, you can redistribute it and/or modify
it under the same terms as Perl itself.

=cut
1	#!/usr/bin/perl -w
2
3	BEGIN { $ENV{CATALYST_ENGINE} \|\|= 'CGI' }
4
5	use strict;
6	use FindBin;
7	use lib "$FindBin::Bin/../lib";
8	use Webpacus;
9
10	Webpacus->run;
11
12	1;
13
14	=head1 NAME
15
16	webpacus_cgi.pl - Catalyst CGI
17
18	=head1 SYNOPSIS
19
20	See L<Catalyst::Manual>
21
22	=head1 DESCRIPTION
23
24	Run a Catalyst application as cgi.
25
26	=head1 AUTHOR
27
28	Sebastian Riedel, C<sri@oook.de>
29
30	=head1 COPYRIGHT
31
32	Copyright 2004 Sebastian Riedel. All rights reserved.
33
34	This library is free software, you can redistribute it and/or modify
35	it under the same terms as Perl itself.
36
37	=cut