in reply to Quicker way to compare these 2 strings?
$matches = ($first ^ $second) =~ tr/\0//; [download]