blob: ead7b5eb2416d201d0390eeb93e60b40c01e4521 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
#!/usr/bin/perl
use strict;
use warnings;
use lib ('lib');
use File::Basename;
use FeedDiscovery::Handler;
use Tatsumaki::Application;
use Plack::Builder;
use Redis;
my $app = Tatsumaki::Application->new( [ '/' => 'FeedDiscovery::Handler' ], );
$app->template_path(dirname(__FILE__) . "/templates");
$app->static_path(dirname(__FILE__) . "/static");
builder {
enable "Plack::Middleware::ConditionalGET";
enable "Plack::Middleware::ETag";
enable "Plack::Middleware::Throttle::Hourly",
backend => Redis->new(
server => '127.0.0.1:6379',
),
max => 10;
$app;
};
|