$line = 'this is TelecommuterTrac\WebIntHitList3';
$findstr='TelecommuterTrac\WebIntHitList3';
$findstr=quotemeta($findstr);
$line=~s#$findstr#country#;