I can't wrap my head around this. I have a history of Perl experience, but not so much in writing modules. So here is what I am trying to do. I am building an MVC web app. I started with the M part. I am abstracting the Model class, and then having different storage classed bolt on. The structure looks like this: Model:

App::Model
App::Model::User
[download]

Storage:

App::Model::Storage::DBI
App::Model::Storage::FlatFile
[download]

Then I create an instance of the model in my app like this:

my $model = App::Model->new(
  storage => 'DBI',
  config => '...',
);
[download]

Then I'd like to be able to use the model like this:

my $user = $model->user->find_by_email(...); # finds user by email and
+ returns App::Model::User object
$user->password('123456'); # change password
$user->save; # save user profile
[download]

So where I got stuck was sharing the config and storage information between the App::Model and App::Model::User class (and other children). What's the best approach? Are there any good modules to take a look at that implement something a similar way?