my $user = My::CDBI::User->retrieve(123);
$user->fname('Fred');
$user->sname('Flintstone');
$user->update;