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 | |
df097c84 |
10 | use Catalyst::ScriptRunner; |
11 | Catalyst::ScriptRunner->run('Gitalist','Test'); |
89de6a33 |
12 | |
13 | 1; |
14 | |
15 | =head1 NAME |
16 | |
17 | gitalist_test.pl - Catalyst Test |
18 | |
19 | =head1 SYNOPSIS |
20 | |
21 | gitalist_test.pl [options] uri |
22 | |
23 | Options: |
24 | -help display this help and exits |
25 | |
26 | Examples: |
27 | gitalist_test.pl http://localhost/some_action |
28 | gitalist_test.pl /some_action |
29 | |
30 | See also: |
31 | perldoc Catalyst::Manual |
32 | perldoc Catalyst::Manual::Intro |
33 | |
34 | =head1 DESCRIPTION |
35 | |
36 | Run a Catalyst action from the command line. |
37 | |
38 | =head1 AUTHORS |
39 | |
40 | Catalyst Contributors, see Catalyst.pm |
41 | |
42 | =head1 COPYRIGHT |
43 | |
44 | This library is free software. You can redistribute it and/or modify |
45 | it under the same terms as Perl itself. |
46 | |
47 | =cut |