理解 perl 中的正则表达式 ~s/[^!-~\s]//g

Question

我已经尝试过这个正则表达式来删除字符串中的非 ascii 字符，它可以工作，但需要了解正则表达式。谁能解释一下。