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	dpavlin	83	#!/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