perlの正規表現で、記号類はどのように表現すればよいですか？
やりたいことはUTF8で書かれた日本語の文章から、
> －-―・「」!'(),….『』´’~☆‐/?“”、！+。
> []:→〈〉＆（）←×‥♂～#`℃@"‘*¨｢｣φ|【】;　%
> =〔〕《》◇∞〓♯●\^◎°○★Ⅱ♭?〃?Ⅸ▲≪≫
などの記号類を全て取り除きたいのです。
EmEditorの正規表現では\Wでこれが実現できるのですが、
perlで\Wとすると・・・。

宜しくお願いします。