如何用Perl正则为等号添加前后空格（仅无空格时执行）

直接用两次正则替换就能精准处理所有情况，避免重复空格：

# 给等号前补空格（仅当前面无空格时）
s/(?<!\s)=/ =/g;

# 给等号后补空格（仅当后面无空格时）
s/=(?!\s)/= /g;

正则说明 #

• (?<!\s) 是反向否定断言，确保匹配的等号前面没有空格，替换后给等号前加一个空格。
• (?!\s) 是正向否定断言，确保匹配的等号后面没有空格，替换后给等号后加一个空格。

测试效果 #

• var myVariable="thisValue" → var myVariable = "thisValue"
• var mySecondVariable ="thisValue" → var mySecondVariable = "thisValue"
• var myThirdVariable= "thisValue" → var myThirdVariable = "thisValue"

内容的提问来源于stack exchange，提问作者Gavin Baumanis