Удаление пробелов между словами только между номерами

Question

У меня есть строка, состоящая из слов, специальных символов (*, |, (и т. Д.) И чисел (плавающих). Я хочу удалить пробелы между словами и специальными символами. . между цифры не должны быть удалены Как я могу это сделать в Perl

Eg:

Rama 1 * 2.34 * (L - 0.45) XYZ 10 20.05 30.06 40 P > 25.

Это должно быть после преобразования:

Rama1*2.34*(L-0.45)XYZ 10 20.05 30.06 40 P>25.

Answer 1

Вы можете использовать приведенное ниже регулярное выражение.

perl -pe 's/\s+(?=\D)|(?<=\D)\s+//g' file 

Пример:

$ echo 'Rama 1 * 2.34 * (L - 0.45) XYZ 10 20.05 30.06 40 P > 25.' | perl -pe 's/\s+(?=\D)|(?<=\D)\s+//g' 
Rama1*2.34*(L-0.45)XYZ10 20.05 30.06 40P>25. 

или

$ echo 'Rama 1 * 2.34 * (L - 0.45) XYZ 10 20.05 30.06 40 P > 25.' | perl -pe 's/(?<=[^\s\w])\s+|\s+(?=[^\w\s])//g' 
Rama 1*2.34*(L-0.45)XYZ 10 20.05 30.06 40 P>25. 

Answer 2

(?<!\d)\h+|\h+(?!\d) 

Вы можете использовать lookarounds here.See демо.

https://regex101.com/r/uF4oY4/62