File Coverage

blib/lib/Test/Environment/Plugin/Apache2/Apache2/Log.pm
Criterion Covered Total %
statement 9 11 81.8
branch n/a
condition n/a
subroutine 3 4 75.0
pod n/a
total 12 15 80.0


line stmt bran cond sub pod time code
1             package Test::Environment::Plugin::Apache2::Apache2::Log;
2              
3             our $VERSION = '0.06';
4              
5             1;
6              
7             package Apache2::Log;
8              
9             =head1 NAME
10              
11             Test::Environment::Plugin::Apache2::Apache2::Log - fake Apache2::Log for Test::Environment
12              
13             =head1 SYNOPSIS
14              
15             use Test::Environment qw{
16             Apache2
17             };
18              
19             $request->log->info('no info');
20              
21             =head1 DESCRIPTION
22              
23             Will add log method to the Apache2::RequestRec.
24              
25             =cut
26              
27 1     1   1943 use warnings;
  1         2  
  1         34  
28 1     1   5 use strict;
  1         2  
  1         42  
29              
30             our $VERSION = '0.06';
31              
32 1     1   1562 use Log::Log4perl;
  1         70144  
  1         7  
33              
34              
35             =head1 METHODS
36              
37             =head2 Apache2::RequestRec::log
38              
39             Returns Log::Log4perl::get_logger().
40              
41             =cut
42              
43             sub Apache2::RequestRec::log {
44 0     0     my $self = shift;
45            
46 0           return Log::Log4perl::get_logger();
47             }
48              
49              
50             'tdtdddddt';
51              
52             __END__