regex - 为什么 # 字符在 Perl 中被视为 'word' 字符？

Question

为什么 # 字符在 Perl 中被视为“单词”字符？或者我误解了这段代码应该如何工作？

#!/usr/bin/perl

my $filename = "Something_with_#_sign.jpg";

$filename =~ s/        # substitute...
                [^             # characters which are NOT:
                \w                # "word" characters
                ]              # end of character classes
                /_/xg;     # ...with an underscore

print "$filename\n";

产量:

Something_with_#_sign.jpg

我原以为 # 符号已被替换为 _(下划线)。

Answer 1

/x不修改字符类的语法(或 \x20 或 s{3,4} 等)，所以

[^             # characters which are NOT:
\w                # "word" characters
]              # end of character classes

是一种奇怪的写作方式

[^ "#:NOTacdefhilnorst\n\w]