Commit | Line | Data |
ba331b70 |
1 | #!/usr/bin/perl |
42b626cd |
2 | use FindBin; |
4b3ff1cd |
3 | BEGIN { |
c7d034f8 |
4 | my $env = "$FindBin::Bin/env"; |
4b3ff1cd |
5 | if (-r $env) { |
6 | do $env or die $@; |
7 | } |
8 | } |
89de6a33 |
9 | |
10 | BEGIN { |
df097c84 |
11 | $ENV{CATALYST_SCRIPT_GEN} = 40; |
89de6a33 |
12 | } |
13 | |
df097c84 |
14 | use Catalyst::ScriptRunner; |
15 | Catalyst::ScriptRunner->run('Gitalist', 'Server'); |
89de6a33 |
16 | |
17 | 1; |
18 | |
19 | =head1 NAME |
20 | |
df097c84 |
21 | gitalist_server.pl - Catalyst Test Server |
89de6a33 |
22 | |
23 | =head1 SYNOPSIS |
24 | |
25 | gitalist_server.pl [options] |
26 | |
89de6a33 |
27 | -d -debug force debug mode |
28 | -f -fork handle each request in a new process |
29 | (defaults to false) |
30 | -? -help display this help and exits |
31 | -host host (defaults to all) |
32 | -p -port port (defaults to 3000) |
33 | -k -keepalive enable keep-alive connections |
34 | -r -restart restart when files get modified |
35 | (defaults to false) |
36 | -rd -restartdelay delay between file checks |
37 | (ignored if you have Linux::Inotify2 installed) |
38 | -rr -restartregex regex match files that trigger |
39 | a restart when modified |
40 | (defaults to '\.yml$|\.yaml$|\.conf|\.pm$') |
41 | -restartdirectory the directory to search for |
42 | modified files, can be set mulitple times |
43 | (defaults to '[SCRIPT_DIR]/..') |
44 | -follow_symlinks follow symlinks in search directories |
45 | (defaults to false. this is a no-op on Win32) |
46 | -background run the process in the background |
47 | -pidfile specify filename for pid file |
48 | |
49 | See also: |
50 | perldoc Catalyst::Manual |
51 | perldoc Catalyst::Manual::Intro |
52 | |
53 | =head1 DESCRIPTION |
54 | |
55 | Run a Catalyst Testserver for this application. |
56 | |
57 | =head1 AUTHORS |
58 | |
59 | Catalyst Contributors, see Catalyst.pm |
60 | |
61 | =head1 COPYRIGHT |
62 | |
63 | This library is free software. You can redistribute it and/or modify |
64 | it under the same terms as Perl itself. |
65 | |
66 | =cut |
df097c84 |
67 | |