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 = Config::Any::General->load( 't/conf/single_element_arrayref.conf' );
30 is_deeply $config->{ foo }, [ 'bar' ], 'single element arrayref';
35 my $file = 't/invalid/conf.conf';
36 my $config = eval { Config::Any::General->load( $file ) };
38 ok( !$config, 'config load failed' );
39 ok( $@, "error thrown ($@)" );