blib/lib/URI/redis_Punix.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 14 | 14 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 7 | 7 | 100.0 |
pod | 4 | 4 | 100.0 |
total | 25 | 25 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package URI::redis_Punix; | ||||||
2 | |||||||
3 | 2 | 2 | 3136 | use strict; | |||
2 | 4 | ||||||
2 | 60 | ||||||
4 | 2 | 2 | 11 | use warnings; | |||
2 | 3 | ||||||
2 | 94 | ||||||
5 | |||||||
6 | our $VERSION = '0.01'; | ||||||
7 | |||||||
8 | 2 | 2 | 9 | use base qw( URI::redis ); | |||
2 | 3 | ||||||
2 | 333 | ||||||
9 | |||||||
10 | 3 | 3 | 1 | 1027 | sub host { undef } | ||
11 | |||||||
12 | 3 | 3 | 1 | 829 | sub port { undef } | ||
13 | |||||||
14 | sub socket_path { | ||||||
15 | 3 | 3 | 1 | 822 | my $self = shift; | ||
16 | |||||||
17 | 3 | 13 | return $self->path; | ||||
18 | } | ||||||
19 | |||||||
20 | 6 | 6 | 1 | 1188 | sub database_from_path { undef } | ||
21 | |||||||
22 | 1; | ||||||
23 | |||||||
24 | __END__ |