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

Question

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

Answer 1

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

Answer 2

空格不是标点符号,并且您没有具体说明是否要保留空格或各种空格,但这种替换将删除所有类型的标点符号(因为有更多形式的标点符号而不仅仅是!,和.) .

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