Select Code to Download

sub my_eq {
  # make sure we are comparing like to like
...
            == Scalar::Util::refaddr($_[1]))
         : ($_[0] eq $_[1]);
}