$matches = ($first ^ $second) =~ tr/\0//; [download]
In reply to Re: Quicker way to compare these 2 strings? by TimToady in thread Quicker way to compare these 2 strings? by Anonymous Monk