Perl正则表达式用逗号和空格替换字符之间的逗号 [英] Perl regex to replace a comma between characters with a comma and a space

问题描述

我想替换下面的字符串

camera,photo,image, data

与

camera, photo, image, data

这在 Perl 中使用正则表达式可行吗?请注意，最后一个单词(数据)已由逗号和空格分隔，因此不应在此处重复此转换.

Is this doable with regex in Perl? Note the last word (data) is already separated by a comma and a space so this conversion shouldn't be repeated there.

推荐答案

怎么样:

my $str = 'camera,photo,image, data';
$str =~ s/,(?=\S)/, /g;
say $str;

输出:

camera, photo, image, data

这篇关于Perl正则表达式用逗号和空格替换字符之间的逗号的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！