File Coverage

blib/lib/CGI/Application/Plugin/CompressGzip.pm
Criterion Covered Total %
statement 18 19 94.7
branch n/a
condition n/a
subroutine 6 7 85.7
pod 1 1 100.0
total 25 27 92.5


line stmt bran cond sub pod time code
1             package CGI::Application::Plugin::CompressGzip;
2             our $VERSION = '1.02';
3              
4              
5 1     1   47532 use 5.006;
  1         4  
  1         41  
6 1     1   6 use strict;
  1         2  
  1         42  
7 1     1   10 use warnings;
  1         2  
  1         32  
8              
9 1     1   1448 use CGI::Application 3.21;
  1         12346  
  1         39  
10 1     1   1436 use CGI::Compress::Gzip 0.19;
  1         195717  
  1         15  
11              
12 1     1   85 use base qw/Exporter/;
  1         2  
  1         189  
13              
14             our @EXPORT = qw(
15             cgiapp_get_query
16             );
17              
18             sub cgiapp_get_query {
19 0     0 1   return CGI::Compress::Gzip->new();
20             }
21              
22             1;
23              
24             __END__