.\" Automatically generated by Pod::Man v1.37, Pod::Parser v1.32
.\"
.\" Standard preamble:
.\" ========================================================================
.de Sh \" Subsection heading
.br
.if t .Sp
.ne 5
.PP
\fB\\$1\fR
.PP
..
.de Sp \" Vertical space (when we can't use .PP)
.if t .sp .5v
.if n .sp
..
.de Vb \" Begin verbatim text
.ft CW
.nf
.ne \\$1
..
.de Ve \" End verbatim text
.ft R
.fi
..
.\" Set up some character translations and predefined strings.  \*(-- will
.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
.\" double quote, and \*(R" will give a right double quote.  \*(C+ will
.\" give a nicer C++.  Capital omega is used to do unbreakable dashes and
.\" therefore won't be available.  \*(C` and \*(C' expand to `' in nroff,
.\" nothing in troff, for use with C<>.
.tr \(*W-
.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
.ie n \{\
.    ds -- \(*W-
.    ds PI pi
.    if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
.    if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\"  diablo 12 pitch
.    ds L" ""
.    ds R" ""
.    ds C` ""
.    ds C' ""
'br\}
.el\{\
.    ds -- \|\(em\|
.    ds PI \(*p
.    ds L" ``
.    ds R" ''
'br\}
.\"
.\" If the F register is turned on, we'll generate index entries on stderr for
.\" titles (.TH), headers (.SH), subsections (.Sh), items (.Ip), and index
.\" entries marked with X<> in POD.  Of course, you'll have to process the
.\" output yourself in some meaningful fashion.
.if \nF \{\
.    de IX
.    tm Index:\\$1\t\\n%\t"\\$2"
..
.    nr % 0
.    rr F
.\}
.\"
.\" For nroff, turn off justification.  Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.hy 0
.if n .na
.\"
.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
.\" Fear.  Run.  Save yourself.  No user-serviceable parts.
.    \" fudge factors for nroff and troff
.if n \{\
.    ds #H 0
.    ds #V .8m
.    ds #F .3m
.    ds #[ \f1
.    ds #] \fP
.\}
.if t \{\
.    ds #H ((1u-(\\\\n(.fu%2u))*.13m)
.    ds #V .6m
.    ds #F 0
.    ds #[ \&
.    ds #] \&
.\}
.    \" simple accents for nroff and troff
.if n \{\
.    ds ' \&
.    ds ` \&
.    ds ^ \&
.    ds , \&
.    ds ~ ~
.    ds /
.\}
.if t \{\
.    ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
.    ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
.    ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
.    ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
.    ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
.    ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
.\}
.    \" troff and (daisy-wheel) nroff accents
.ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
.ds 8 \h'\*(#H'\(*b\h'-\*(#H'
.ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
.ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
.ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
.ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
.ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
.ds ae a\h'-(\w'a'u*4/10)'e
.ds Ae A\h'-(\w'A'u*4/10)'E
.    \" corrections for vroff
.if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
.if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
.    \" for low resolution devices (crt and lpr)
.if \n(.H>23 .if \n(.V>19 \
\{\
.    ds : e
.    ds 8 ss
.    ds o a
.    ds d- d\h'-1'\(ga
.    ds D- D\h'-1'\(hy
.    ds th \o'bp'
.    ds Th \o'LP'
.    ds ae ae
.    ds Ae AE
.\}
.rm #[ #] #H #V #F C
.\" ========================================================================
.\"
.IX Title "RunApp 3pm"
.TH RunApp 3pm "2008-01-09" "perl v5.8.8" "User Contributed Perl Documentation"
.SH "NAME"
RunApp \- A generic module to run web\-applications
.SH "SYNOPSIS"
.IX Header "SYNOPSIS"
.Vb 1
\& use RunApp \(aq\-chdir\(aq;
.Ve
.PP
.Vb 2
\& use RunApp;
\& use RunApp::Apache;
.Ve
.PP
.Vb 11
\& my $cmd = shift || \(aqdevelopment\(aq;
\& my $config = { var => \(aqvalue\(aq, app_apache => { var_for_apache => \(aqvalue\(aq} };
\& RunApp\->new (app_apache => RunApp::Apache\->new
\&                    (root => catfile (cwd, $_),
\&                     httpd => \(aq/path/to/httpd\(aq),
\&              my_daemon => RunApp::Control::AppControl\->new
\&                    (binary => \(aq/path/to/daemon\(aq,
\&                     args => [\(aq\-\-daemon\(aq],
\&                     pidfile => \(aq/path/to/daemon.pid\(aq,
\&                    )
\&                 )\->$cmd ($config);
.Ve
.SH "DESCRIPTION"
.IX Header "DESCRIPTION"
\&\f(CW\*(C`RunApp\*(C'\fR streamlines the process for configuring applications
that requires one or more web servers and/or other daemons, during
development or deployment.
.PP
It builds the config files required by the services from the
\&\f(CW$config\fR hash, such as apache's httpd.conf.
.SH "OPTIONS"
.IX Header "OPTIONS"
.Vb 2
\& use RunApp \(aq\-chdir\(aq;
\& use RunApp qw(\-chdir ..);
.Ve
.PP
This will cause the your script to \f(CW\*(C`chdir\*(C'\fR to the base directory.  If
it's a symbolic link it will be resolved and you will be in the
directory of where the original script is.  The \f(CW\*(C`lib\*(C'\fR directory will
be added into \f(CW@INC\fR, and you can use the modules in that path.
.PP
It also takes an optional relative path if want the script to chdir to
somewhere else.
.PP
This makes it possible for symlinking the your runapp script into
system's rc.d startup directory.
.SH "CONSTRUCTOR"
.IX Header "CONSTRUCTOR"
.Sh "new (@services)"
.IX Subsection "new (@services)"
\&\f(CW@services\fR is actually an hash, with keys being the name of the
service, and values being \f(CW\*(C`RunApp::Control\*(C'\fR objects.  Use an
array instead of a hash here to retain the order of dispatching.
.PP
The names are used to pick config from the hash, which will be flatten
into top level of the config hash, when running \f(CW\*(C`build\*(C'\fR for the each
service.
.SH "METHODS"
.IX Header "METHODS"
.Sh "$self\->development ($conf)"
.IX Subsection "$self->development ($conf)"
Runs \f(CW\*(C`build\*(C'\fR and \f(CW\*(C`start\*(C'\fR, and then waits for \s-1SIGINT\s0 to <stop> the
servers.
.SH "AUTOLOAD"
.IX Header "AUTOLOAD"
All other methods are dispatched to the \f(CW\*(C`RunApp::Control\*(C'\fR objects in
the order called in \s-1CONSTRUCTOR\s0.  Note that this is done with
RunApp::Control dispatching to the \f(CW\*(C`dispatch\*(C'\fR method.
.SH "SEE ALSO"
.IX Header "SEE ALSO"
RunApp::Apache, RunApp::Control::AppControl, App::Control
.SH "AUTHORS"
.IX Header "AUTHORS"
Chia-liang Kao <clkao@clkao.org>
.PP
Refactored from works by Leon Brocard <acme@astray.com> and
Tom Insam <tinsam@fotango.com>.
.SH "COPYRIGHT"
.IX Header "COPYRIGHT"
Copyright (C) 2002\-5, Fotango Ltd.
.PP
This module is free software; you can redistribute it or modify it
under the same terms as Perl itself.