1 package Class::Tiny::Object;
11 return bless({ ref($_[0]) eq 'HASH' ? %{$_[0]} : @_ }, $class);
12 $NO_BUILD{$class} = !$class->can('BUILD') unless exists $NO_BUILD{$class};
14 ? bless({ ref($_[0]) eq 'HASH' ? %{$_[0]} : @_ }, $class)
15 : bless({ ref($_[0]) eq 'HASH' ? %{$_[0]} : @_ }, $class)->BUILDALL;
20 $self->${\(($BUILD_MAKER ||= do {
21 require Method::Generate::BuildAll;
22 Method::Generate::BuildAll->new
23 })->generate_method(ref($self)))}(@_);
28 { no warnings 'redefine'; *does = \&Role::Tiny::does_role }
29 goto &Role::Tiny::does_role;