sub comparifier {
  no warnings 'uninitialized'; # because blessed() and reftype() can return undef.
  blessed($_[0]).reftype($_[0]).$_[0]
  eq
  blessed($_[1]).reftype($_[1]).$_[1]
}