Inheritance with Moose 

package FeatureArticle;

use Moose;

extends 'Article';

has 'photo' => (is => 'rw', predicate => 'has_photo');