Branch Coverage

blib/lib/GDPR/IAB/TCFv2.pm
Criterion Covered Total %
branch 50 66 75.7


line true false branch
70 2 33 unless $tc_string
84 1 30 if (exists $opts{'prefetch'})
87 0 1 if ref $prefetch ne ref []
105 2 29 if $strict and $self->version != 2
108 0 29 if $self->vendor_list_version == 0
134 20 2 wantarray ? :
143 20 2 wantarray ? :
216 0 25 if $id < 1 or $id > 12
236 0 48 if $id < 1 or $id > 24
254 0 48 if $id < 1 or $id > 24
315 1 18 if (scalar @_ == 6)
344 4 32 unless not $self->{'options'}{'json'}{'use_epoch'}
348 0 32 if ref $format eq ref sub { }
360 42 12 unless (not $self->{'options'}{'json'}{'compact'})
366 120 120 unless $verbose
396 6 210 $self->_safe_is_special_feature_opt_in($_) ? :
405 36 396 $self->_safe_is_purpose_consent_allowed($_) ? :
413 180 252 $self->_safe_is_purpose_legitimate_interest_allowed($_) ? :
428 12 6 $self->is_service_specific ? :
0 18 $self->use_non_standard_stacks ? :
0 18 $self->purpose_one_treatment ? :
442 1 31 if $core_data_size < {"MIN_BYTE_SIZE" => 29,"PREFIX" => "C","SEPARATOR" => "\\."}->{'MIN_BYTE_SIZE'}
466 1 39 unless $s =~ / ^ (?: [A-Za-z0-9-_]{4} )* (?: [A-Za-z0-9-_]{2} [AEIMQUYcgkosw048] | [A-Za-z0-9-_] [AQgw] )? \z /x
527 2 27 if $legitimate_interest_start >= $data_size
562 29 29 if defined $validate_next_offset
571 17 39 if ($is_range) { }
584 56 0 wantarray ? :
604 17 0 wantarray ? :
622 39 0 wantarray ? :
629 1 4 unless defined $gdpr_consent_string
636 5 0 if (my $native_decode_base64url = "MIME::Base64"->can("decode_base64url"))
646 0 0 if (my $native_json_true = "JSON"->can("true"))
652 0 0 if (my $native_json_false = "JSON"->can("false"))