File Coverage

blib/lib/App/FonBot/Daemon.pm
Criterion Covered Total %
statement 19 21 90.4
branch n/a
condition n/a
subroutine 7 7 100.0
pod n/a
total 26 28 92.8


line stmt bran cond sub pod time code
1             package App::FonBot::Daemon;
2              
3             our $VERSION = '0.001';
4              
5 1     1   13098 use 5.014000;
  1         2  
  1         25  
6 1     1   3 use strict;
  1         1  
  1         29  
7 1     1   4 use warnings;
  1         4  
  1         20  
8              
9 1     1   814 use Log::Log4perl qw//;
  1         33783  
  1         19  
10 1     1   578 use POE;
  1         29542  
  1         5  
11              
12 1     1   54988 use App::FonBot::Plugin::Config;
  1         3  
  1         40  
13 1     1   384 use App::FonBot::Plugin::Common;
  0            
  0            
14             use App::FonBot::Plugin::OFTC;
15             use App::FonBot::Plugin::BitlBee;
16             use App::FonBot::Plugin::HTTPD;
17             use App::FonBot::Plugin::Email;
18              
19             use sigtrap qw/die normal-signals/;
20              
21             use constant PLUGINS => map { "App::FonBot::Plugin::$_" } qw/Config Common OFTC BitlBee HTTPD Email/;
22              
23             ##################################################
24              
25             sub run{
26             Log::Log4perl->init('/etc/fonbotd/log4perl.conf');
27             chdir '/var/lib/fonbot';
28             $_->init for PLUGINS;
29             POE::Kernel->run;
30             }
31              
32             sub finish{
33             $_->fini for reverse PLUGINS
34             }
35              
36             1;
37              
38             __END__