sub check_id {
  my ( $id )= @_;
  my $res;
  eval {
      my $obj= ObjClass::Obj->new();
            $obj->id( $id );
            $obj->load_via_id() ;
            $res= $obj->id ;
            if (! $obj->activated_account) {
                DEBUG && warn "invalid user";
                return -1;
            }
  }
  if ($@) {
     DEBUG && log_error( $@ );
     return -1;
  }
  return $res;
}