File Coverage

blib/lib/Plack/HTTPParser.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package Plack::HTTPParser;
2 39     39   234 use strict;
  39         40  
  39         1495  
3 39     39   610 use parent qw(Exporter);
  39         343  
  39         490  
4              
5             our @EXPORT = qw( parse_http_request );
6              
7 39     39   4333 use Try::Tiny;
  39         1915  
  39         10451  
8              
9             {
10             if (!$ENV{PLACK_HTTP_PARSER_PP} && try { require HTTP::Parser::XS; 1 }) {
11             *parse_http_request = \&HTTP::Parser::XS::parse_http_request;
12             } else {
13             require Plack::HTTPParser::PP;
14             *parse_http_request = \&Plack::HTTPParser::PP::parse_http_request;
15             }
16             }
17              
18             1;
19              
20             __END__