# Copyright (C) 2017 all contributors # License: AGPL-3.0+ use strict; use warnings; use Test::More; use_ok 'PublicInbox::Hval'; my $ibx = { -no_obfuscate_re => qr/(?:example\.com)\z/i, -no_obfuscate => { 'meta@public-inbox.org' => 1, } }; my $html = <<'EOF'; hello@example.comm hello@example.com meta@public-inbox.org test@public-inbox.org test@a.b.c.org EOF PublicInbox::Hval::obfuscate_addrs($ibx, $html); my $exp = <<'EOF'; hello@example•comm hello@example.com meta@public-inbox.org test@public-inbox•org test@a•b.c.org EOF is($html, $exp, 'only obfuscated relevant addresses'); done_testing();