Your problem is, \W is a unknown escape sequence, so use ' not ".

$line = 'this is TelecommuterTrac\WebIntHitList3';
$line =~ s/\QTelecommuterTrac\WebIntHitList3/country/;
print $line
__OUTPUT__
this is country
[download]