t/load_module_error.t

   1 use strictures;
   2
   3 package load_module_error;
   4
   5 use Test::More;
   6
   7 use lib 't/lib';
   8
   9 eval "use sub_class;";
  10
  11 ok $@, "got a crash";
  12 unlike $@, qr/Unknown error/, "it came with a useful error message";
  13
  14 done_testing;