t/52-json.t

   1 use strict;
   2 use warnings;
   3
   4 use Test::More;
   5 use Config::Any::JSON;
   6
   7 if ( !Config::Any::JSON->is_supported ) {
   8     plan skip_all => 'JSON format not supported';
   9 }
  10 else {
  11     plan tests => 2;
  12 }
  13
  14 {
  15     my $config = Config::Any::JSON->load( 't/conf/conf.json' );
  16     ok( $config );
  17     is( $config->{ name }, 'TestApp' );
  18 }