Common construction in core perl application

use MooseX::Declare;
class MyApp::Library {
    use MyApp::Album;
    use MooseX::Types::Moose qw(HashRef ClassName);
    has album_class => (
        is => 'ro',
        isa => ClassName,
        required =>1,
        default => 'MyApp::Album',
        handles => {
            create_sample_album => 'new',
        },
    );
    has album => (
        is => 'ro', 
        isa => 'MyApp::Album', 
        init_arg => undef, 
        lazy_build => 1,
    );
    has album_args => (
        is => 'ro',
        isa => HashRef,
        required => 1,
    );
    method _build_album {
        $self->create_album($self->args);
    }
}