7 eval "require MooseX::StrictConstructor; use Test::Exception;";
9 'This test requires MooseX::StrictConstructor and Test::Exception'
16 use MooseX::Singleton;
17 use MooseX::StrictConstructor;
19 has 'attrib' => ( is => 'rw' );
23 MySingleton->new( bad_name => 42 );
25 qr/Found unknown attribute/, 'singleton class also has a strict constructor';