３箱目乙です。

「表」のように２バイト目に「5C」のコードが使われている文字を
shift-jisで扱うと、文字化けしたりエラーになったりするので、
それを防ぐために

$str=~s/表/表\/;

のように文字の後ろに「\」を付けたいのですがこれもエラーになります。
どのようにすればいいでしょうか？