Line # Revision Author
1 296 ahitrov package promosuite::Apache;
2
3 # ----------------------------------------------------------------------------
4 # Хендлеры Apache для проекта promosuite
5 # В этом пакете обязательно должны быть функции child_init(),
6 # request_init(), child_exit().
7 # ----------------------------------------------------------------------------
8
9 use strict;
10 use vars qw($VERSION @ISA @EXPORT);
11
12 use Exporter;
13 @ISA = qw(Exporter);
14 $VERSION = '1.0';
15
16
17 # Эта функция будет вызвана в момент создания дочернего процесса Apache
18 sub child_init {
19 my $proto = shift;
20 }
21
22 # Эта функция будет вызвана в момент начала обработки нового запроса
23 sub request_init {
24 }
25
26 # Эта функция будет вызвана в момент уничтожения дочернего процесса Apache
27 sub child_exit {
28 }
29
30
31 1;