App::Model
App::Model::User

##</code><code>##

App::Model::Storage::DBI
App::Model::Storage::FlatFile

##</code><code>##

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

##</code><code>##

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