$ perl -Dr -ce '/[\S*\W*]/'
Compiling REx `[\S*\W*]'
size 13 Got 108 bytes for offset annotations.
first at 1
   1: ANYOF[\0-\377!utf8::IsSpacePerl !utf8::IsWord](13)
  13: END(0)
stclass `ANYOF[\0-\377!utf8::IsSpacePerl !utf8::IsWord]' minlen 1 
Offsets: [13]
        1[8] 0[0] 0[0] 0[0] 0[0] 0[0] 0[0] 0[0] 0[0] 0[0] 0[0] 0[0] 9[
+0] 
Omitting $` $& $' support.

EXECUTING...

-e syntax OK
Freeing REx: `"[\\S*\\W*]"'
[download]

Now, pay attention to the 'ANYOF' part. It includes all the ASCII and LATIN-1 characters (it also includes lots of Unicode characters, but that's not important right now).

Abigail