File Coverage

blib/lib/SBOM/CycloneDX/Enum/PatentAssertionType.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::PatentAssertionType;
2              
3 16     16   305 use 5.010001;
  16         65  
4 16     16   109 use strict;
  16         38  
  16         443  
5 16     16   75 use warnings;
  16         47  
  16         770  
6 16     16   95 use utf8;
  16         29  
  16         124  
7              
8 16     16   973 use Exporter 'import';
  16         52  
  16         3597  
9             our (@EXPORT_OK, %EXPORT_TAGS, %ENUM);
10              
11             BEGIN {
12              
13 16     16   187 %ENUM = (
14             OWNERSHIP => 'ownership',
15             LICENSE => 'license',
16             THIRD_PARTY_CLAIM => 'third-party-claim',
17             STANDARDS_INCLUSION => 'standards-inclusion',
18             PRIOR_ART => 'prior-art',
19             EXCLUSIVE_RIGHTS => 'exclusive-rights',
20             NON_ASSERTION => 'non-assertion',
21             RESEARCH_OR_EVALUATION => 'research-or-evaluation'
22             );
23              
24 16         98 require constant;
25 16         1753 constant->import(\%ENUM);
26              
27 16         137 @EXPORT_OK = sort keys %ENUM;
28 16         1570 %EXPORT_TAGS = (all => \@EXPORT_OK);
29              
30             }
31              
32 2     2 0 27 sub values { sort values %ENUM }
33              
34             1;
35              
36             =encoding utf-8
37              
38             =head1 NAME
39              
40             SBOM::CycloneDX::Enum::PatentAssertionType - Assertion Type
41              
42             =head1 SYNOPSIS
43              
44             use SBOM::CycloneDX::Enum qw(PATENT_ASSERTION_TYPE);
45              
46             say PATENT_ASSERTION_TYPE->THIRD_PARTY_CLAIM;
47              
48              
49             use SBOM::CycloneDX::Enum::PatentAssertionType;
50              
51             say SBOM::CycloneDX::Enum::PatentAssertionType->EXCLUSIVE_RIGHTS;
52              
53              
54             use SBOM::CycloneDX::Enum::PatentAssertionType qw(:all);
55              
56             say RESEARCH_OR_EVALUATION;
57              
58              
59             =head1 DESCRIPTION
60              
61             L is ENUM package used by L.
62              
63             The type of assertion being made about the patent or patent family.
64             Examples include ownership, licensing, and standards inclusion.
65              
66              
67             =head1 CONSTANTS
68              
69             =over
70              
71             =item * C, The manufacturer asserts ownership of the patent or
72             patent family.
73              
74             =item * C, The manufacturer asserts they have a license to use the
75             patent or patent family.
76              
77             =item * C, A third party has asserted a claim or
78             potential infringement against the manufacturer’s component or service.
79              
80             =item * C, The patent is part of a standard essential
81             patent (SEP) portfolio relevant to the component or service.
82              
83             =item * C, The manufacturer asserts the patent or patent family
84             as prior art that invalidates another patent or claim.
85              
86             =item * C, The manufacturer asserts exclusive rights
87             granted through a licensing agreement.
88              
89             =item * C, The manufacturer asserts they will not enforce
90             the patent or patent family against certain uses or users.
91              
92             =item * C, The patent or patent family is being
93             used under a research or evaluation license.
94              
95             =back
96              
97             =head1 SUPPORT
98              
99             =head2 Bugs / Feature Requests
100              
101             Please report any bugs or feature requests through the issue tracker
102             at L.
103             You will be notified automatically of any progress on your issue.
104              
105             =head2 Source Code
106              
107             This is open source software. The code repository is available for
108             public review and contribution under the terms of the license.
109              
110             L
111              
112             git clone https://github.com/giterlizzi/perl-SBOM-CycloneDX.git
113              
114              
115             =head1 AUTHOR
116              
117             =over 4
118              
119             =item * Giuseppe Di Terlizzi
120              
121             =back
122              
123              
124             =head1 LICENSE AND COPYRIGHT
125              
126             This software is copyright (c) 2025-2026 by Giuseppe Di Terlizzi.
127              
128             This is free software; you can redistribute it and/or modify it under
129             the same terms as the Perl 5 programming language system itself.
130              
131             =cut