>  2006/10/11 (水) 13:42:15        [qwerty]
> > ああ(;´Д`)ソースをコピペするとこう
> > $x = "i have a chinko.";
> > $a = "chinko";
> > $b = "manko";
> > eval "\$x =~ tr/$a/$b/;";
> > print $x;
> > n aave a mankoo.とか出る不思議だ
> $x = "i have a chinko.";
> $a = "chinko";
> $b = "manko";
> $x =~ s/$a/$b/g;
> print $x;
> C:\tmp>perl a.pl
> i have a manko.
> (;´Д`)?

eval使うにしてもtrじゃなくてsなら問題ないようだけど
そもそもeval使う必要があるのかがよく分からん

参考:2006/10/11(水)13時37分50秒