$ 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*]"'