Commit | Line | Data |
---|---|---|
ce585b65 | 1 | #!/usr/bin/env perl |
2 | ||
3 | use strictures 1; | |
4 | use Cwd qw(abs_path); | |
5 | use File::Basename qw(dirname); | |
6 | our $here; | |
7 | BEGIN { $here = dirname(abs_path($0)).'/..' } | |
8 | use lib $here.'/lib', $here.'/../App-SCS/lib'; | |
9 | use App::SCS; | |
10 | ||
11 | (my $scs = App::SCS->new( | |
12 | config => { | |
13 | plugins => [ | |
14 | Feeds => {}, | |
15 | Server => {}, | |
16 | Generate => { host => 'northwestengland.pm.org' }, | |
17 | ] | |
18 | } | |
19 | ))->run_if_script; |