in reply to Re: Capturing occurrence counts via tr/// with variable interpolationin thread Capturing occurrence counts via tr/// with variable interpolation
$ans = eval "\$str =~ y/\Q$SrchStr\E//"; [download]