t/63-invalid.t

   1 use strict;
   2 use warnings;
   3
   4 use Test::More tests => 2;
   5
   6 use Config::Any::Perl;
   7
   8 {
   9     my $file   = 't/conf/conf_invalid.pl';
  10     my $config = eval { Config::Any::Perl->load( $file ) };
  11
  12     ok( !$config, 'config load failed' );
  13     ok( $@, "error thrown ($@)" );
  14 }