5 use Config::Any::General;
7 if ( !Config::Any::General->is_supported ) {
8 plan skip_all => 'Config::General format not supported';
15 my $config = Config::Any::General->load( 't/conf/conf.conf' );
17 is( $config->{ name }, 'TestApp' );
18 ok( exists $config->{ Component } );
22 my $config = Config::Any::General->load( 't/conf/conf.conf',
23 { -LowerCaseNames => 1 } );
24 ok( exists $config->{ component } );
29 my $file = 't/invalid/conf.conf';
30 my $config = eval { Config::Any::General->load( $file ) };
32 ok( !$config, 'config load failed' );
33 ok( $@, "error thrown ($@)" );