Yet Another CPAN Grep

UserAgent-Any ( M/MA/MATHIAS/Dist-Setup/UserAgent-Any-0.05.tar.gz, MATHIAS, 2024; MetaCPAN )

UserAgent-Any/lib/UserAgent/Any/Response/Impl.pm ( view source; MetaCPAN )

decode
# JSON content (as it’s not in the spec).
has _forced_charset => (
  is => 'ro',
  lazy => 1,
  default => sub ($self) {
    if ($self->header('Content-Type') =~ m{^ application/json \s* ; .*