line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package App::MultiModule::Test::NagiosCmd; |
2
|
|
|
|
|
|
|
$App::MultiModule::Test::NagiosCmd::VERSION = '1.161200'; |
3
|
2
|
|
|
2
|
|
271208
|
use strict;use warnings; |
|
2
|
|
|
2
|
|
4
|
|
|
2
|
|
|
|
|
42
|
|
|
2
|
|
|
|
|
6
|
|
|
2
|
|
|
|
|
2
|
|
|
2
|
|
|
|
|
46
|
|
4
|
2
|
|
|
2
|
|
6
|
use Test::More; |
|
2
|
|
|
|
|
8
|
|
|
2
|
|
|
|
|
10
|
|
5
|
2
|
|
|
2
|
|
324
|
use App::MultiModule::Test; |
|
2
|
|
|
|
|
2
|
|
|
2
|
|
|
|
|
116
|
|
6
|
|
|
|
|
|
|
|
7
|
|
|
|
|
|
|
=head2 some pod |
8
|
|
|
|
|
|
|
=cut |
9
|
|
|
|
|
|
|
sub _begin { |
10
|
2
|
|
|
2
|
|
204882
|
App::MultiModule::Test::clear_queue('NagiosCmd'); |
11
|
2
|
|
|
|
|
10536
|
App::MultiModule::Test::clear_queue('test_out'); |
12
|
|
|
|
|
|
|
} |
13
|
|
|
|
|
|
|
sub _finish { |
14
|
0
|
|
|
0
|
|
|
App::MultiModule::Test::clear_queue('NagiosCmd'); |
15
|
0
|
|
|
|
|
|
App::MultiModule::Test::clear_queue('test_out'); |
16
|
|
|
|
|
|
|
} |
17
|
|
|
|
|
|
|
|
18
|
|
|
|
|
|
|
1; |