{ package Corolla; use Moo; extends 'Car'; has '+drive_type' => (default => 'fwd'); has '+body_type' => (default => 'hatch'); has '+engine_cap' => (default => 1798); } my $corolla = Corolla->new; print $corolla->dump;