File Coverage

lib/Neo4j/Driver/Plugin/LWP.pm
Criterion Covered Total %
statement 20 20 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod 2 2 100.0
total 31 31 100.0


line stmt bran cond sub pod time code
1 2     2   231142 use v5.10.1;
  2         9  
2 2     2   12 use strict;
  2         4  
  2         78  
3 2     2   9 use warnings;
  2         3  
  2         181  
4              
5             package Neo4j::Driver::Plugin::LWP;
6             # ABSTRACT: Neo4j::Driver plug-in for libwww-perl
7             $Neo4j::Driver::Plugin::LWP::VERSION = '1.02';
8              
9 2     2   821 use Neo4j::Driver::Net::HTTP::LWP;
  2         6  
  2         84  
10              
11 2     2   12 use parent 'Neo4j::Driver::Plugin';
  2         2  
  2         16  
12 2     2   1961 BEGIN { Neo4j::Driver::Plugin->VERSION('0.34') }
13              
14 1     1 1 402895 sub new { bless {}, shift }
15              
16             sub register {
17 1     1 1 43 my ($self, $events) = @_;
18             $events->add_handler( http_adapter_factory => sub {
19 1     1   571 my ($continue, $driver) = @_;
20 1         15 return Neo4j::Driver::Net::HTTP::LWP->new($driver);
21 1         10 });
22             }
23              
24             1;
25              
26             __END__