在Perl中删除字符串中的标点符号

Question

如何从Perl中的字符串中删除除空格以外的所有标点符号？

Answer 1

s/[[:punct:]]//g 

Answer 2

空格不是标点符号，你没有具体说明是否要保留空格或各种空格，但是这种替换将删除所有类型的标点符号（因为标点符号的形式不仅仅是！ ，和。）。

$string =~ s/[[:punct:]]//g;