File Coverage

blib/lib/Connector/Builtin/Null.pm
Criterion Covered Total %
statement 29 29 100.0
branch n/a
condition n/a
subroutine 12 12 100.0
pod 7 7 100.0
total 48 48 100.0


line stmt bran cond sub pod time code
1             # Connector::Builtin::Null
2              
3             use strict;
4 1     1   135291 use warnings;
  1         11  
  1         27  
5 1     1   5 use English;
  1         2  
  1         27  
6 1     1   4  
  1         1  
  1         8  
7             use Moose;
8 1     1   904 extends 'Connector::Builtin';
  1         418064  
  1         7  
9              
10             has '+LOCATION' => ( required => 0 );
11              
12             my $self = shift;
13             return undef;
14 2     2 1 9 }
15 2         7  
16             my $self = shift;
17             return ();
18             }
19 2     2 1 5  
20 2         9 my $self = shift;
21             return 0;
22             }
23              
24 2     2 1 5 my $self = shift;
25 2         6 return ();
26             }
27              
28             my $self = shift;
29 2     2 1 22 return undef;
30 2         9 }
31              
32             my $self = shift;
33             return 1;
34 2     2 1 7 }
35 2         7  
36             my $self = shift;
37             return 0;
38             }
39 2     2 1 4  
40 2         6 no Moose;
41             __PACKAGE__->meta->make_immutable;
42              
43             1;
44 2     2 1 5  
45 2         6 =head1 Name
46              
47             Connector::Builtin::Null
48 1     1   6695  
  1         2  
  1         5  
49             =head1 Description
50              
51             This is mainly useful to replace active connectors in test setups.
52              
53             Handles each request as access to a non-existing items.
54             Set requests return boolean true, input is discarded.