mirror of https://github.com/sipwise/www_admin.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
39 lines
507 B
39 lines
507 B
#!/usr/bin/perl -w
|
|
use strict;
|
|
|
|
BEGIN { $ENV{CATALYST_ENGINE} ||= 'CGI' }
|
|
|
|
use strict;
|
|
use warnings;
|
|
use FindBin;
|
|
use lib "$FindBin::Bin/../lib";
|
|
use admin;
|
|
|
|
admin->run;
|
|
|
|
1;
|
|
|
|
=head1 NAME
|
|
|
|
admin_cgi.pl - Catalyst CGI
|
|
|
|
=head1 SYNOPSIS
|
|
|
|
See L<Catalyst::Manual>
|
|
|
|
=head1 DESCRIPTION
|
|
|
|
Run a Catalyst application as a cgi script.
|
|
|
|
=head1 AUTHOR
|
|
|
|
Sebastian Riedel, C<sri@oook.de>
|
|
|
|
=head1 COPYRIGHT
|
|
|
|
|
|
This library is free software, you can redistribute it and/or modify
|
|
it under the same terms as Perl itself.
|
|
|
|
=cut
|