>>802
無意味っていったのは、効く効かないという意味でじゃなくてね。

 s/[\Q!#\$\%&'()+-.=\@[]^_`{}~\E]//gm; 
だと、\$ はそれぞれに対して\Qの効果が反映するから、\\\$になって
ブラケットの中に含まれる文字の中に\ も入るよ。
この\は$のエスケープのためにいれてんだから意味ないんじゃね?
つーことなんだけど。

 [$] はエラーになるけど、[\$] はエラーにならなくて、かつ$は含まれていて
\は含まれない。ということで  >>793 で求めているものはこれでいいんじゃないの?

>perl -e "print qr<[\Q\$\E]>"
(?-xism:[\\\$])
>perl -e "print qr<[\$]>"
(?-xism:[\$])
>perl -e "print qr<[$]>"
Unmatched [ in regex; marked by <-- HERE in m/[ <-- HERE 5.008008/

長くなった。すまん、