如果还没有空格，请在等号周围添加一个空格

Question

我正在尝试制定一个 Perl 正则表达式，用于在等号（“=”）周围添加空格 - 但前提是那里已经没有空格了：

var myVariable="thisValue" -> var myVariable = "thisValue"
var mySecondVariable ="thisValue" -> var mySecondVariable = "thisValue"
var myThirdVariable= "thisValue" -> var myThirdVariable = "thisValue"

我已成功用空格替换有效字符。

我设法在“=”之前有双空格...而后面什么也没有。

Answer 1

简单。只需使用

[^ ]=

，这意味着“等号后面不带空格”

while(<>) {
    $_ =~ s/[^ ]=/ =/;
    $_ =~ s/=[^ ]/= /;
        print;
}