Parent Directory | Revision Log
Import of web font-end for WebPAC v2 called WebPACus based on Catalyst
1 | package Webpacus::Controller::Results; |
2 | |
3 | use strict; |
4 | use warnings; |
5 | use base 'Catalyst::Controller'; |
6 | |
7 | =head1 NAME |
8 | |
9 | Webpacus::Controller::Results - Catalyst Controller |
10 | |
11 | =head1 SYNOPSIS |
12 | |
13 | See L<Webpacus> |
14 | |
15 | =head1 DESCRIPTION |
16 | |
17 | Catalyst Controller. |
18 | |
19 | =head1 METHODS |
20 | |
21 | =over 4 |
22 | |
23 | =item default |
24 | |
25 | =cut |
26 | |
27 | sub default : Private { |
28 | my ( $self, $c ) = @_; |
29 | |
30 | sleep 3; |
31 | |
32 | $c->stash->{template} = 'results.tt'; |
33 | } |
34 | |
35 | =back |
36 | |
37 | |
38 | =head1 AUTHOR |
39 | |
40 | Dobrica Pavlinusic,,, |
41 | |
42 | =head1 LICENSE |
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 |
48 | |
49 | 1; |
ViewVC Help | |
Powered by ViewVC 1.1.26 |