在解析过程中将`*`粘贴到最近的下一个单词

Ale*_*lex -1 regex perl parsing

我在文中有以下内容:

int* a, b;
Run Code Online (Sandbox Code Playgroud)

预期的结果是:

int *a, b;
Run Code Online (Sandbox Code Playgroud)

以下Perl代码应该产生预期的行:

$line =~ s#\s*\*\s*#\s\*#g;
Run Code Online (Sandbox Code Playgroud)

不幸的是,结果如下:

int*a, b;
Run Code Online (Sandbox Code Playgroud)

正则表达式有什么问题?

Ama*_*dan 6

我不认为你可以用来\s代替; 它代表搜索中的一个字符类(空格,包括空格,制表符等),但是一个类在替换中没有任何意义.使用普通空间.