DB<1> $ans1=42
DB<2> $ref1=\$ans1
DB<3> $ref2=\$ans1
DB<4> if ($ref1 eq $ref2) { print "match\n" }
match
DB<5> $ans2 = 42
DB<6> $ref2 = \$ans2
DB<7> if ($ref1 eq $ref2) { print "match\n" }
DB<8> if ($$ref1 eq $$ref2)  { print "match\n" }
match