删除指定字符前后的空格

unk*_*tha 0 perl removing-whitespace

LIST.txt
ark = 1  bark= 2  car  =3  dorm    =4
ark=8  bark  = 25  car  =  33  dorm  =5
Run Code Online (Sandbox Code Playgroud)

我有一个名为LIST.txt的文件,如上所示.我希望输出如OUTPUT.txt中所示

OUTPUT.txt
ark=1  bark=2  car=3  dorm=4
ark=8  bark=25  car=33  dorm=5
Run Code Online (Sandbox Code Playgroud)

我没有成功删除"="之前和之后的空格.我试图删除空格的方法让我产生了这样的东西

ark=1bark=2car=3dorm=4
ark=8bark=25car=33dorm=5
Run Code Online (Sandbox Code Playgroud)

任何人都可以帮我解决这个问题.

小智 5

perl -pe 's/\s*=\s*/=/g' LIST.txt
Run Code Online (Sandbox Code Playgroud)

输出

ark=1  bark=2  car=3  dorm=4
ark=8  bark=25  car=33  dorm=5
Run Code Online (Sandbox Code Playgroud)