カンガルーオアシス

qq()がうまく適用出来ない場合

perlでプログラミングする時、qq()を使うと""もその中で使えるし、変数も展開されるから便利なんですが、文字列の中に正規表現で末尾にマッチする$をつけると変数と間違えられるので、どうも使えないみたいです。いや、良い方法が有るのかもしれませんが…。仕方ないので、その時には文字列を分割して問題となる部分を''かq()で括って使っています。

ちょっと美しくないなー。本当に良い方法無いんでしょうか？