perl使いいる？(;´Д`)

$x = i have a chinko.
$a = "chinko";
$b = "manko";
$x =~ s/$a/$b/;

とか書いて
$xの内容を
i have a manko.に書き換えたいんだけどどうすればいいよ(;´Д`)

$x =~ s/$a/$b/;
のかわりに
eval "\$x =~ tr/$a/$b/;";
を試したんだが何故か文字化けする(;´Д`)