Catalyst authentication auto_update and auto_create result/resultset methods

User.pm

package MyApp::Schema::Result::User;

...

# Called everytime a user logs in
sub auto_update {
    my ( $self, $auth_args ) = @_;

    $self->update( $auth_args );

    return $self;
}

package MyApp::Schema::ResultSet::User;

...

# Called when a new user is found
sub auto_create {
    my ( $self, $auth_args ) = @_;

    my $user = $self->create( $auth_args );

    return $user;
}