何故か「ー」の置換が出来ません。
他の日本語や、逆（〜をーにする）は出来ます。何故なんでしょうか？

print "content-type: text/html\n\n";

$str = "ボール";
$out = "ー";
$in = "〜";

$str =~ s/$out/$in/;
print $str;