Yet Another CPAN Grep

XXX ( I/IN/INGY/XXX-0.38.tar.gz, INGY, 2021; MetaCPAN )

XXX/lib/XXX.pod ( view source; MetaCPAN )

with => 'JSON::Color';
    use XXX -with => 'JSON::SomeOtherJsonModule';

You can also use the environment variable C<PERL_XXX_DUMPER> to set the
module, for example;

    PERL_XXX_DUMPER=JSON::Color

_XXX_DUMPER=YAML::PP::Highlight perl script.pl

Only modules with names beginning with 'YAML' or 'JSON', and the Data::Dumper,
Data::Dump, and Data::Dump::Color modules are supported.

If you need to

XXX ( I/IN/INGY/XXX-0.38.tar.gz, INGY, 2021; MetaCPAN )

XXX/lib/XXX.pm ( view source; MetaCPAN )

-with '$DumpModule'"
        unless $DumpModule =~ /^(
                                   (?:YAML|JSON)(?:::.*)?|
                                   Data::Dumper|
                                   Da

     (substr($DumpModule, 0, 4) eq 'YAML') ? 'yaml' :
        (substr($DumpModule, 0, 4) eq 'JSON') ? 'json' :
        ($DumpModule eq 'Data::Dumper') ? 'dumper' :
        ($DumpModule eq 'Data::Dump'

eturn &{"$DumpModule\::Dump"}(@_) . "...\n";
    }
    if ($dump_type eq 'json') {
        return &{"$DumpModule\::encode_json"}(@_);
    }
    if ($dump_type eq 'dumper') {
        local $Data::Dumpe