为什么perl 5.x与[0-9a-zA-Z]的下划线匹配？

Question

在以下代码中：

my $s="_";  
if ( $s =~ /[0-9a-zA-z]/  ) {
      print " $s contains [0-9a-zA-z] \n";
}

我得到了结果

 _ contains [0-9a-zA-z]

为什么下划线被视为此角色类的一部分？

我尝试过5.8.8和5.16.3（分别是64位RHEL 6.8 / 7.3）