$b = dclone($a); if (deepequals($a,$b) { print " $a $b are equal, one is a clone of the other\n"; }
In reply to deepequals by Anonymous Monk