File Coverage

lib/Crypt/Perl/X509/Extension/ct_precert_poison.pm
Criterion Covered Total %
statement 22 22 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod 0 1 0.0
total 30 31 96.7


line stmt bran cond sub pod time code
1             package Crypt::Perl::X509::Extension::ct_precert_poison;
2              
3 1     1   868 use strict;
  1         3  
  1         32  
4 1     1   5 use warnings;
  1         2  
  1         44  
5              
6             =encoding utf-8
7              
8             =head1 NAME
9              
10             Crypt::Perl::X509::Extension::ct_precert_poison
11              
12             =head1 SYNOPSIS
13              
14             my $extn = Crypt::Perl::X509::Extension::ct_precert_poison->new();
15              
16             =head1 DESCRIPTION
17              
18             Instances of this class represent a C extension
19             of an X.509 (SSL) certificate.
20              
21             You probably don’t need to
22             instantiate this class directly; see L
23             and L for the way this module is meant to be used.
24              
25             =head1 SEE ALSO
26              
27             =over
28              
29             =item * L
30              
31             =item * L
32              
33             =back
34              
35             =cut
36              
37 1         10 use parent qw(
38             Crypt::Perl::X509::Extension
39 1     1   5 );
  1         1  
40              
41 1     1   69 use constant OID => '1.3.6.1.4.1.11129.2.4.3';
  1         2  
  1         77  
42              
43 1     1   5 use constant ASN1 => <
  1         3  
  1         75  
44             ct_precert_poison ::= NULL
45             END
46              
47 6     6 0 31 sub new { bless [] }
48              
49 1     1   6 use constant CRITICAL => 1;
  1         2  
  1         40  
50              
51 1     1   5 use constant _encode_params => ();
  1         3  
  1         59  
52              
53             1;