bless do { my %self = (%{Colour->new($colour)}, %{Age->new($age)}); \%self }, $class;