Это тоже должно работать -
perl -pe 's/(?<=[0-9])(\s)(?=[0-9])//g'
Мы используем отрицательный взгляд позади и смотрим в будущее, где мы ищем числа в обоих случаях.Если мы найдем пространство между ними, мы заменим ничем.
[jaypal:~] echo "There are 1 123 456 drops of water" | perl -pe 's/(?<=[0-9])(\s)(?=[0-9])//g'
There are 1123456 drops of water