use MooseX::Declare; class Camera { # methods ... } class MobilePhone { # methods ... } class CameraPhone extends(Camera, MobilePhone) { # methods ... }