Commit | Line | Data |
239b5fc0 |
1 | package [% class %]; |
d6b20d81 |
2 | use Moose; |
3 | use namespace::autoclean; |
239b5fc0 |
4 | |
d6b20d81 |
5 | [% IF long_type == 'Controller' %]BEGIN {[% END %]extends 'Catalyst::[% long_type %]';[% IF long_type == 'Controller' %] }[% END %] |
239b5fc0 |
6 | |
7 | =head1 NAME |
8 | |
9 | [% class %] - Catalyst [% long_type %] |
10 | |
11 | =head1 DESCRIPTION |
12 | |
13 | Catalyst [% long_type %]. |
14 | [% IF long_type == 'Controller' %] |
15 | =head1 METHODS |
16 | |
17 | =cut |
18 | |
19 | |
20 | =head2 index |
21 | |
22 | =cut |
23 | |
24 | sub index :Path :Args(0) { |
25 | my ( $self, $c ) = @_; |
26 | |
27 | $c->response->body('Matched [% class %] in [%name%].'); |
28 | } |
29 | |
30 | [% END %] |
31 | =head1 AUTHOR |
32 | |
33 | [%author%] |
34 | |
35 | =head1 LICENSE |
36 | |
37 | This library is free software. You can redistribute it and/or modify |
38 | it under the same terms as Perl itself. |
39 | |
40 | =cut |
41 | |
d6b20d81 |
42 | __PACKAGE__->meta->make_immutable; |
43 | |
641b89e2 |
44 | 1; |