1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
...
any '/' => sub {
my ($c) = @_;
my $config = $c->config;
my $counter = $c->session->get('counter') || $config->{initial_counter};
$counter++;
$c->session->set('counter' => $counter);
return $c->render('index.tx', {
counter => $counter,
});
};
...
|
Comments
comments powered by Disqus