File Coverage

blib/lib/SBOM/CycloneDX/Enum/ProtocolType.pm
Criterion Covered Total %
statement 20 20 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 0 1 0.0
total 27 28 96.4


line stmt bran cond sub pod time code
1             package SBOM::CycloneDX::Enum::ProtocolType;
2              
3 16     16   309 use 5.010001;
  16         70  
4 16     16   103 use strict;
  16         47  
  16         462  
5 16     16   81 use warnings;
  16         30  
  16         836  
6 16     16   134 use utf8;
  16         50  
  16         143  
7              
8 16     16   773 use Exporter 'import';
  16         49  
  16         3749  
9             our (@EXPORT_OK, %EXPORT_TAGS, %ENUM);
10              
11             BEGIN {
12              
13 16     16   233 %ENUM = (
14             TLS => 'tls',
15             SSH => 'ssh',
16             IPSEC => 'ipsec',
17             IKE => 'ike',
18             SSTP => 'sstp',
19             WPA => 'wpa',
20             DTLS => 'dtls',
21             QUIC => 'quic',
22             EAP_AKA => 'eap-aka',
23             EAP_AKA_PRIME => 'eap-aka-prime',
24             PRINS => 'prins',
25             X_5G_AKA => '5g-aka',
26             OTHER => 'other',
27             UNKNOWN => 'unknown',
28             );
29              
30 16         94 require constant;
31 16         2933 constant->import(\%ENUM);
32              
33 16         210 @EXPORT_OK = sort keys %ENUM;
34 16         1916 %EXPORT_TAGS = (all => \@EXPORT_OK);
35              
36             }
37              
38 2     2 0 32 sub values { sort values %ENUM }
39              
40              
41             1;
42              
43             =encoding utf-8
44              
45             =head1 NAME
46              
47             SBOM::CycloneDX::Enum::ProtocolType - The protocol type used by cryptographic assets
48              
49             =head1 SYNOPSIS
50              
51             use SBOM::CycloneDX::Enum qw(PROTOCOL_TYPE);
52              
53             say PROTOCOL_TYPE->IPSEC;
54              
55              
56             use SBOM::CycloneDX::Enum::ProtocolType;
57              
58             say SBOM::CycloneDX::Enum::ProtocolType->SSH;
59              
60              
61             use SBOM::CycloneDX::Enum::ProtocolType qw(:all);
62              
63             say IKE;
64              
65              
66             =head1 DESCRIPTION
67              
68             L is ENUM package used by L.
69              
70              
71             =head1 CONSTANTS
72              
73             =over
74              
75             =item * C, Transport Layer Security
76              
77             =item * C, Secure Shell
78              
79             =item * C, Internet Protocol Security
80              
81             =item * C, Internet Key Exchange
82              
83             =item * C, Secure Socket Tunneling Protocol
84              
85             =item * C, Wi-Fi Protected Access
86              
87             =item * C, Datagram Transport Layer Security
88              
89             =item * C, Quick UDP Internet Connections
90              
91             =item * C, Extensible Authentication Protocol variant
92              
93             =item * C, Enhanced version of EAP-AKA
94              
95             =item * C, Protection of Inter-Network Signaling
96              
97             =item * C (5g-aka), Authentication and Key Agreement for 5G
98              
99             =item * C, Another protocol type
100              
101             =item * C, The protocol type is not known
102              
103             =back
104              
105             =head1 SUPPORT
106              
107             =head2 Bugs / Feature Requests
108              
109             Please report any bugs or feature requests through the issue tracker
110             at L.
111             You will be notified automatically of any progress on your issue.
112              
113             =head2 Source Code
114              
115             This is open source software. The code repository is available for
116             public review and contribution under the terms of the license.
117              
118             L
119              
120             git clone https://github.com/giterlizzi/perl-SBOM-CycloneDX.git
121              
122              
123             =head1 AUTHOR
124              
125             =over 4
126              
127             =item * Giuseppe Di Terlizzi
128              
129             =back
130              
131              
132             =head1 LICENSE AND COPYRIGHT
133              
134             This software is copyright (c) 2025-2026 by Giuseppe Di Terlizzi.
135              
136             This is free software; you can redistribute it and/or modify it under
137             the same terms as the Perl 5 programming language system itself.
138              
139             =cut