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

Question

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

Answer 1

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

Answer 2

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

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