sub doit {
  ...
  Database::Special->doSomethingSpecial($db);
  # no need to rebless, you haven't tampered with $db
}

##</code><code>##

  sub doSomethingSpecial {
    my ($self) = @_;
    ...
  }

##</code><code>##

  sub doSomethingSpecial {
    my ($class, $object) = @_;
    ...
  }