Исправление kompospec, 01.11.21 13:41 (текущая версия) :
Ещё немножко и получится почти как у меня на Перл
($_,$r)=split/[+\s]+/;
Исходная версия kompospec, 01.11.21 13:41: