File Coverage

blib/lib/SBOM/CycloneDX/Enum/TlpClassification.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::TlpClassification;
2              
3 16     16   287 use 5.010001;
  16         65  
4 16     16   95 use strict;
  16         32  
  16         455  
5 16     16   91 use warnings;
  16         57  
  16         903  
6 16     16   120 use utf8;
  16         44  
  16         109  
7              
8 16     16   795 use Exporter 'import';
  16         65  
  16         2941  
9             our (@EXPORT_OK, %EXPORT_TAGS, %ENUM);
10              
11             BEGIN {
12              
13 16     16   185 %ENUM = (
14              
15             # Traffic Light Protocol (TLP) v2.0
16             CLEAR => 'CLEAR',
17             GREEN => 'GREEN',
18             AMBER => 'AMBER',
19             AMBER_AND_STRICT => 'AMBER_AND_STRICT',
20             RED => 'RED',
21             );
22              
23 16         97 require constant;
24 16         1274 constant->import(\%ENUM);
25              
26 16         190 @EXPORT_OK = sort keys %ENUM;
27 16         1810 %EXPORT_TAGS = (all => \@EXPORT_OK);
28              
29             }
30              
31 2     2 0 16 sub values { sort values %ENUM }
32              
33             1;
34              
35             =encoding utf-8
36              
37             =head1 NAME
38              
39             SBOM::CycloneDX::Enum::TlpClassification - Traffic Light Protocol (TLP) Classification
40              
41             =head1 SYNOPSIS
42              
43             use SBOM::CycloneDX::Enum qw(TLP_CLASSIFICATION);
44             say TLP_CLASSIFICATION->GREEN;
45              
46             use SBOM::CycloneDX::Enum::TlpClassification qw(:all);
47             say AMBER_AND_STRICT;
48              
49              
50             =head1 DESCRIPTION
51              
52             L is ENUM package used by L.
53              
54             Traffic Light Protocol (TLP) is a classification system for identifying the
55             potential risk associated with artefact, including whether it is subject to
56             certain types of legal, financial, or technical threats. Refer to L
57             for further information.
58              
59             The default classification is C.
60              
61             =head1 CONSTANTS
62              
63             =over
64              
65             =item * C, The information is not subject to any restrictions as regards
66             the sharing.
67              
68             =item * C, The information is subject to limited disclosure, and recipients
69             can share it within their community but not via publicly accessible channels.
70              
71             =item * C, The information is subject to limited disclosure, and recipients
72             can only share it on a need-to-know basis within their organization and with clients.
73              
74             =item * C, The information is subject to limited disclosure,
75             and recipients can only share it on a need-to-know basis within their organization.
76              
77             =item * C, The information is subject to restricted distribution to individual
78             recipients only and must not be shared.
79              
80             =back
81              
82             =head1 SUPPORT
83              
84             =head2 Bugs / Feature Requests
85              
86             Please report any bugs or feature requests through the issue tracker
87             at L.
88             You will be notified automatically of any progress on your issue.
89              
90             =head2 Source Code
91              
92             This is open source software. The code repository is available for
93             public review and contribution under the terms of the license.
94              
95             L
96              
97             git clone https://github.com/giterlizzi/perl-SBOM-CycloneDX.git
98              
99              
100             =head1 AUTHOR
101              
102             =over 4
103              
104             =item * Giuseppe Di Terlizzi
105              
106             =back
107              
108              
109             =head1 LICENSE AND COPYRIGHT
110              
111             This software is copyright (c) 2025-2026 by Giuseppe Di Terlizzi.
112              
113             This is free software; you can redistribute it and/or modify it under
114             the same terms as the Perl 5 programming language system itself.
115              
116             =cut