Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
- name: "MyApp"
server_class: "FCGI::Engine::Manager::Server::HTTP::Prefork"
scriptname: "script/"
nproc: 3
pidfile: "run/"
socket: ""
#!/usr/bin/env perl
use strict;
use warnings;
use local::lib;
use FindBin;
use FCGI::Engine::Manager;
use lib "$FindBin::Bin/../lib";
my $cmd = shift @ARGV;
die 'Must supply command!' unless $cmd;
my $conf = "$FindBin::Bin/../conf/app_manager.yml";
print FCGI::Engine::Manager->new( conf => $conf )->$cmd;
package FCGI::Engine::Manager::Server::HTTP::Prefork;
use Moose;
our $VERSION = '0.01';
extends 'FCGI::Engine::Manager::Server';
# We don't actually hav ea socket
has 'socket' => (
is => 'rw',
isa => 'Str',
required => 0
sub construct_command_line {
my $self = shift;
return (
? $self->additional_args
: ()),
sub remove_pid_object { }
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment