fix non-interactive return value... 0 means passed, not 1.
[sgn.git] / bin / sgn_test.pl
blob2b672b0051160d84c8d63b0857e84a93a1f2e347
1 #!/usr/bin/env perl
3 use Catalyst::ScriptRunner;
4 Catalyst::ScriptRunner->run('SGN', 'Test');
6 1;
8 =head1 NAME
10 sgn_test.pl - Catalyst Test
12 =head1 SYNOPSIS
14 sgn_test.pl [options] uri
16 Options:
17 --help display this help and exits
19 Examples:
20 sgn_test.pl http://localhost/some_action
21 sgn_test.pl /some_action
23 See also:
24 perldoc Catalyst::Manual
25 perldoc Catalyst::Manual::Intro
27 =head1 DESCRIPTION
29 Run a Catalyst action from the command line.
31 =head1 AUTHORS
33 Catalyst Contributors, see Catalyst.pm
35 =head1 COPYRIGHT
37 This library is free software. You can redistribute it and/or modify
38 it under the same terms as Perl itself.
40 =cut