Group
Extension

Matches 1

DBI-Test ( R/RE/REHSACK/DBI-Test-0.001.tar.gz, REHSACK, 2013; MetaCPAN )
DBI-Test/lib/DBI/Test/DSN/Provider/Config.pm ( view source; MetaCPAN )
y $json;
my $have_config_any;
my $have_file_configdir;
my $have_file_find_rule;

BEGIN
{
    foreach my $mod (qw(JSON JSON::PP))
    {
        eval "require $mod";
        $@ and next;
        $json =
    last;
    }

    # $json or die "" . __PACKAGE__ . " requires a JSON parser";
    # finally ... Config::Any could be enough, and most recent
    # perl5 are coming with JSON::PP

    $have_file_co
fdirs;
  };

$have_config_any
  or *get_config_pattern = sub {
    my @pattern;
    $json and push( @pattern, "json" );
    @pattern;
  };

$have_config_any
  and *get_config_pattern = sub {
    my @p

Powered by Groonga
Maintained by Kenichi Ishigaki <ishigaki@cpan.org>. If you find anything, submit it on GitHub.