4 use Test::More tests => 3;
25 default => sub { 10 },
32 default => sub { "yay" },
36 throws_ok { Class->new } qr/Attribute \(foo\) is required/, "required attribute is required";
37 lives_ok { Class->new(foo => 5) } "foo is the only required but unfulfilled attribute";
38 lives_ok { Class->new(foo => 1, bar => 1, baz => 1, quux => 1) } "all attributes specified";