File Coverage

blib/lib/GDPR/IAB/TCFv2/Constants/Purpose.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package GDPR::IAB::TCFv2::Constants::Purpose;
2 1     1   115441 use strict;
  1         2  
  1         29  
3 1     1   3 use warnings;
  1         6  
  1         55  
4              
5             require Exporter;
6 1     1   6 use base qw;
  1         1  
  1         134  
7              
8             use constant {
9 1         175 InfoStorageAccess => 1,
10             BasicAdserving => 2,
11             PersonalizationProfile => 3,
12             PersonalizationSelection => 4,
13             ContentProfile => 5,
14             ContentSelection => 6,
15             AdPerformance => 7,
16             ContentPerformance => 8,
17             MarketResearch => 9,
18             DevelopImprove => 10,
19             SelectContent => 11,
20 1     1   5 };
  1         2  
21              
22 1         116 use constant PurposeDescription => {
23             InfoStorageAccess => "Store and/or access information on a device",
24             BasicAdserving => "Use limited data to select advertising",
25             PersonalizationProfile => "Create profiles for personalised advertising",
26             PersonalizationSelection =>
27             "Use profiles to select personalised advertising",
28             ContentProfile => "Create profiles to personalise content",
29             ContentSelection => "Use profiles to select personalised content",
30             AdPerformance => "Measure advertising performance",
31             ContentPerformance => "Measure content performance",
32             MarketResearch =>
33             "Understand audiences through statistics or combinations of data from different sources",
34             DevelopImprove => "Develop and improve services",
35             SelectContent => "Use limited data to select content",
36 1     1   4 };
  1         1  
37              
38             our @EXPORT_OK = qw<
39             InfoStorageAccess
40             BasicAdserving
41             PersonalizationProfile
42             PersonalizationSelection
43             ContentProfile
44             ContentSelection
45             AdPerformance
46             ContentPerformance
47             MarketResearch
48             DevelopImprove
49             SelectContent
50             PurposeDescription
51             >;
52             our %EXPORT_TAGS = ( all => \@EXPORT_OK );
53              
54             1;
55              
56             __END__