use strict;
use warnings;
use Test::More tests => 1;
use Test::DBICSchemaLoaderDigest;

local $ENV{LANG} = 'C';

eval {
    test_dbic_schema_loader_digest('/;THIS;/IS$==-/!!INVALID((((FILENAME))))');
};
like $@, qr{No such file or directory}, 'file not found';