File Coverage

blib/lib/URI/pop.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 1 1 100.0
total 19 19 100.0


line stmt bran cond sub pod time code
1             package URI::pop; # RFC 2384
2              
3 1     1   19 use strict;
  1         2  
  1         49  
4 1     1   6 use warnings;
  1         2  
  1         102  
5              
6             our $VERSION = '5.34';
7              
8 1     1   8 use parent 'URI::_emailauth';
  1         1  
  1         9  
9              
10 1     1   71 use URI::Escape qw(uri_unescape);
  1         3  
  1         112  
11              
12 2     2 1 6 sub default_port { 110 }
13              
14             #pop://;auth=@:
15              
16             1;