Understanding the regex ~s/[^!-~\s]//g in perl

Question

I have tried this regex for remove the non-ascii character in string and it's working but need to understand the regex. Can anyone explain pls.