Select Code to Download

use Scalar::Util qw( blessed reftype );

...
 && reftype $_[0] eq reftype $_[1]
 &&         $_[0] eq         $_[1]
}