File Coverage

blib/lib/Net/IMAP/Simple/SSL.pm
Criterion Covered Total %
statement 12 14 85.7
branch n/a
condition n/a
subroutine 4 6 66.6
pod n/a
total 16 20 80.0


line stmt bran cond sub pod time code
1             package Net::IMAP::Simple::SSL;
2             # $Id: SSL.pm,v 1.3 2004/06/29 11:52:38 cwest Exp $
3 1     1   750 use strict;
  1         2  
  1         32  
4              
5 1     1   5 use vars qw[$VERSION];
  1         1  
  1         48  
6             $VERSION = (qw$Revision: 1.3 $)[1];
7              
8 1     1   1324 use IO::Socket::SSL;
  1         249050  
  1         12  
9 1     1   1329 use base qw[Net::IMAP::Simple];
  1         2  
  1         1418  
10              
11 0     0     sub _port { 993 }
12 0     0     sub _sock_from { 'IO::Socket::SSL' }
13              
14             1;
15              
16             __END__