peczenyj / GDPR-IAB-TCFv2 / 25549330132

96%

main: 96%

push

github

fix: replace // defined-or with defined() ternary for Perl 5.8 (#71)

The dist's MIN_PERL_VERSION is 5.008, but three sites used the
defined-or operator //, a Perl 5.10 feature. On Perl 5.8 the parser
treats // as the empty regex match and consumes tokens until it
finds a closing /, producing confusing "runaway multi-line // string"
errors when followed by `do { ... }` blocks or comments containing
slashes.

This caused t/08-golden-validator.t to bail out on Perl 5.8.9 once
the smoker reached lib/.../CMPValidator.pm and the iabtcfv2 CLI to
fail compilation.

Sites fixed:

- lib/.../CMPValidator.pm:84  (http_client default)
- lib/.../Validator/Reason.pm:107  (reason_string fallback)
- bin/iabtcfv2:321  (warn-handler msg default)

All three now use the equivalent `defined($x) ? $x : $y` form (or an
unless/defined block where it reads more naturally).

Co-authored-by: Claude Opus 4.7 <noreply@anthropic.com>

5 of 5 new or added lines in 3 files covered. (100.0%)

1065 of 1114 relevant lines covered (95.6%)

10857.27 hits per line