#!/usr/bin/env perl use strict; use warnings; use Data::Dumper; use FindBin; BEGIN { unshift @INC, "$FindBin::Bin/../lib", "$FindBin::Bin/../local/lib/perl5", "$FindBin::Bin/../lib/perl5"; @INC = grep { $_ !~ /perl\/5.20.2/ } @INC; } print Dumper \@INC; my $listen_socket = '3000'; my $watch_paths = [ 'lib', 'templates', 'app', '/opt/local/vote' ]; # Start command line interface for application require Mojolicious::Commands; Mojolicious::Commands->start_app('Vote','daemon','-l',"http://*:$listen_socket");