source: bookmarks/trunk/start @ 94

Last change on this file since 94 was 94, checked in by peter, 9 years ago

start script:

  • config file is given in a --file|-f switch
  • read the port to listen on from the config file (port setting); still defaults to 5000
  • Property svn:executable set to *
File size: 625 bytes
Line 
1#!/usr/bin/perl -w
2use strict;
3
4use FindBin;
5use lib "$FindBin::RealBin/lib";
6
7use Getopt::Long;
8use YAML;
9use Plack::Runner;
10use BookmarksApp;
11
12GetOptions(
13    'file=s' => \my $CONFIG_FILE,
14);
15
16$CONFIG_FILE ||= 'conf.yml';
17-e $CONFIG_FILE or die "Config file $CONFIG_FILE not found\n";
18my $config = YAML::LoadFile($CONFIG_FILE);
19my $app = BookmarksApp->new({ config => $config })->to_app;
20
21my $listen = ':' . ($config->{port} || 5000);
22
23my $runner = Plack::Runner->new(server => 'Starman');
24$runner->parse_options(qw{--listen}, $listen, qw{--daemonize --pid pid --error-log errors --access-log access});
25$runner->run($app);
Note: See TracBrowser for help on using the repository browser.