Там строчка такая (loren ipsum):

Aaaa: ловыа ва лывоа Bbb.bb: sdfkjfsd lksdf Cccc: kjlsdfl lsd

Т.е. ключевые поля - это слова без пробелов, но могут содержать точки, потом двоеточие.

Я думаю разбирать так - разбить по двоеточиям:
Aaaa
ловыа ва лывоа Bbb.bb
sdfkjfsd lksdf Cccc
kjlsdfl lsd

и далее последовательно выделять последнее слово.

Regexp не хочу насиловать.

Есть другие идеи? может кто писал?

(13) Интересно, а что будет быстрее в плане получения последнего слова из строки? Разделить на 1000000 слов текст и получить последний элемент, или же найти с конца индекс последнего пробела и получить по нему последнее слово?)

Зачем все это? (10) (14)
м=стрразделить();
для каждого стр из м цикл
   н=стрразделить();
   сообщить(н[н.количество()-1]);
конеццикла;

(15) бигдата будет негодовать просто от попыток произвольно лазить по очень большой строке, при условии, что части этой строки могут быть в дисковой памяти, а части в оперативной.

(19) я загружал массивы по 16 гигов ксв - не рассказывай мне как это делать ))))
(18) Я выдал Ключ-Значение, у тебя что за нах?

(20) У него просто дважды строка в массив строк разделяется, вначале по ":" Потом по " " и берется последний элемент.

(20) ну и как 16-гиговая строка себя чувствовала, особенно на компе с 8Г оперативки?

(0) Все же просто
Разбиваешь по пробелам
Дальше в цикле перебираешь элементы массива, если последний символ ":", то твой пациент

(5) хабростатья?

(18) так же +

(22) когда подключили пхп вполне себе.

(13) Потому что можно проще и быстрее

(23) если сначала делить по пробелам, тогда последнее слово (lsd) придётся обыгрывать дополнительно и простота теряется

(10) я уже свой написал, без БСП, конечно же:


Функция РазобратьСтрокуСПараметрамиИдентификаторами(Строка, Разделитель = ":") Экспорт
    
    СооПараметры = Новый Соответствие();
    Массив = СтрРазделить(Строка, Разделитель);
    Пока Массив.Количество() > 1 Цикл
        Ключ = Массив[0];          
        ТекСтрока = Массив[1];
        СтруктураСлова = ВыделитьСловоСКонцаСтроки(ТекСтрока);
        Если Массив.Количество() = 2 Тогда //Особый случай, последний
            Значение = ТекСтрока;            
        Иначе
            Значение = СтруктураСлова.Левое;
            Массив[1] = СтруктураСлова.Правое;
        КонецЕсли;
        СооПараметры.Вставить(Ключ, СокрЛП(Значение));
        Массив.Удалить(0);
    КонецЦикла;
    
    Возврат СооПараметры;
    
КонецФункции

Функция ВыделитьСловоСКонцаСтроки(Строка) Экспорт
    Р = Новый Структура("Левое, Правое", "", "");
    Длина = СтрДлина(Строка);
    Для Инд = 1 По Длина Цикл    
        Поз = Длина - Инд + 1;
        Симв = Сред(Строка, Поз, 1);
        Если Симв = " " Тогда
            Р.Левое = Лев(Строка, Поз - 1);
            Прервать;
        КонецЕсли;
        Р.Правое = Симв + Р.Правое;
    КонецЦикла;
    Возврат р;
КонецФункции



(23) тоже вариант, в принципе.

1. КА с обратным поиском (цикл с конца по начало строки) для замены " " перед ":" на другой символ
2. Далее банально

(28) О, боже мой, да, перед началом обработки массива придется в последнем элементе добавить : в конец

(29) Хочется блевануть

Геня как всегда в (0) ничего внятно не объяснил, а потом написал код, из которого следует, что он хотел разбить строку на пары "Ключ + Значение", разделенные двоеточиями
Генитально, как всегда

(34) Пардон, двоеточиеми имеется в виду не пары, а ключ и значение

(34) Гениальный постановщик задачи)

Посмотрел (0), еще раз чуть не блеванул от прекрасного примера, из которго нихрена непонятно, где там ключи, где там значения, а где просто Геня нассал между прочим

(36) Индус белорусский, my ass

(33) Извини, я не хотел вызывать у тебя блевонтин, лучше не читай мои ветки, раз у тебя на меня аллергия. ;-)

(19) в выписках длина текста ограничена таки.

(0) "Aaaa: ловыа ва лывоа Bbb.bb: sdfkjfsd lksdf Cccc: kjlsdfl lsd"

Результат какой должен получиться. Так и не понял что на выходе необходимо получить.

(39) Проблема даже не в том, что у тебя код неоптимальный
Проблема в том, что нихрена не сообразишь, что он делает, пока не выполнишь
СтруктураСлова какая-то, в которой типа есть левое и правое слово, а на самом деле левая часть без последнего слова и правая часть, равная последнему слову
Исключение для мать его _особого_ случая
Непонятное название функции
И все это, помноженное на говнокод, делает код нечитабельным от слова совсем

хотя бы так что ли написал

Функция ПараметрыИдентификации(СтрокаПараметров)
    
    ПараметрыИдентификации = Новый Соответствие;
    
    Если ПустаяСтрока(СтрокаПараметров) Тогда
        Возврат ПараметрыИдентификации;
    КонецЕсли;
    
    МассивПодстрок = СтрРазделить(СтрокаПараметров, ":");
    
    Если МассивПодстрок.Количество() = 1 Тогда
        Возврат ПараметрыИдентификации;
    КонецЕсли;
    
    МассивПодстрок[МассивПодстрок.Количество() - 1] = МассивПодстрок[МассивПодстрок.Количество() - 1] + " ";
    
    Ключ = МассивПодстрок[0];
    
    Для ПорядковыйНомерПараметра = 1 По МассивПодстрок.Количество() - 1 Цикл
        ЗначениеПлюсКлюч = Сред(МассивПодстрок[ПорядковыйНомерПараметра], 2);
        ПозицияПоследнегоПробела = СтрНайти(ЗначениеПлюсКлюч, " ", НаправлениеПоиска.СКонца);
        Значение = Лев(ЗначениеПлюсКлюч, ПозицияПоследнегоПробела - 1);
        ПараметрыИдентификации.Вставить(Ключ, Значение);
        Ключ = Сред(ЗначениеПлюсКлюч, ПозицияПоследнегоПробела + 1);
    КонецЦикла;
    
    Возврат ПараметрыИдентификации;
    
КонецФункции


(41) Геня выше корректных понятных примеров, сами догадаются

Aaaa: ловыа ва лывоа
Bbb.bb: sdfkjfsd lksdf
Cccc: kjlsdfl lsd

+(43) Вот что мешало вместо собачьего "Aaaa: ловыа ва лывоа Bbb.bb: sdfkjfsd lksdf Cccc: kjlsdfl lsd" написать "Плательщик: Иванов Иван Иванович Месяц.Год: 12.2022 Сумма: 200"?

(42) а мне твой код кажется сложным. Вот уж действительно, кто как привык, тот так и пишет.

(44) ну там на турецком (хз что там конфиденциально, что нет), а так то да, можно было, виноват.

(42) а, я понял что мне не нравится в твоем коде. Ты не разбиваешь его на под-процедуры. Даже у меня подпроцедура одна завалялась. Ну и потом я использую рекурсию в виде удаления из массива, это сокращает код

(44) уровень гениальности же.

(46) Тогда на чистом SQL и на 1C SQL не буду предлагать.

(45) LOL
Твой код вообще выполнить нужно, чтобы понять, что в итоге будет

(47) А что мне разбивать-то, там разбивать нечего, проще в паре мест комментарии добавить, зачем это нужно

(47) Рекурсию ты не используешь, двоечник
А удаление ты зря сделал, меняешь данные, потому что тебе лень вычислить указатель
За такое канделябром бьют, бывает

(51) разделяй и властвуй ибо, старо как мир.
(52) вот эта мелочность идет от перфекционизма. Понятно же, что простота восприятия кода в данном случае важнее, чем эффективность, которую потребитель даже не заметит. Я меняю не данные, а временные данные, почуй разницу. Это ты еще Лиспа не нюхал, там такая деструкция - норма жизни

(51) но ты их не добавил

(53) Разделяют тогда, когда есть что разделять
Если разделять нечего, то разделение усложняет, а не упрощает понимание

А зачем сначала делите на слова с разделителем ":"?
Проще сначала поделить слова по пробелам. Потом перед каждым словом, в котором есть ":" перенос строки выводить и усё.

(53) Геня, в твоем варианте до перфекционизма вечность, о чем ты
Просто хотя бы хоть насколько-то читабельным код сделать и то великое дело

(54) Ну так и ты не заплатил за него

(56) Потому что ТС написал одно в (0), а получить в итоге хочет другое (связку Ключ+Значение, где до двоеточия ключ, после - значение)

(56) Нет
Тогда придется значения соединять через пробел до тех пор, пока не встретился ключ (в конце ":") или не конец массива

+(60) А так каждая пара "Ключ + Значение" хранится так:
Ключ — последнее слово в строке
Значение — все, без последнего слова, в следующей строке
Последнюю строку не берем, там только значение

Гений деградирует. Куда катится мир...

(60) А если примерно так:

ИсходнаяСтрока = "ыва: фыдофвдыаоф двао дфвлоадфоп вдлаоа: ывдопв аджоф фовыа фдова влаовло: ыдваоыдлвао дыоады вопы дао";
Подстрока = "";

МассивСтрок = СтрРазделить(ИсходнаяСтрока, " "); // тут пробел
Для Каждого Стр Из ИсходнаяСтрока Цикл

    Если Найти(Стр, ":") Тогда
        Сообщить(Подстрока);
        Подстрока = "";
    КонецЕсли;

    Подстрока = Подстрока +" "+ Стр; // тут тоже пробел

КонецЦикла;

Сообщить(Подстрока);

(63) Эээ... что это?
Ты хоть проверяй что ли, перед тем как пишешь

(63) Но на SQL мне нравится больше. Наверняка же на входе не одна строка, а некое поле у таблицы в том виде как в (0). И данную операцию необходимо проводить не над одной строкой, а над всеми.

(64) На коленке писал. Может где и ошибся :-)

https://infostart.ru/1c/articles/371887/

(64) На выходе должно быть примерно вот это:

ыва: фыдофвдыаоф двао дфвлоадфоп
вдлаоа: ывдопв аджоф фовыа фдова
влаовло: ыдваоыдлвао дыоады вопы дао

(63)
"Для Каждого Стр Из ИсходнаяСтрока Цикл"
заменить на
"Для Каждого Стр Из МассивСтрок Цикл"

(0) ну вот ровно то что Гений попросил в исходном посте:

инпут = "Aaaa: ловыа ва лывоа Bbb.bb: sdfkjfsd lksdf Cccc: kjlsdfl lsd";
аутпут = новый массив;
МассивПодстрок = СтрРазделить(инпут,":");
Для Итератор = 0 по МассивПодстрок.Количество()-2 Цикл
    ПромежуточныйМассив = СтрРазделить(МассивПодстрок.Получить(Итератор)," ");
    аутпут.Добавить(ПромежуточныйМассив.Получить(ПромежуточныйМассив.ВГраница()));
КонецЦикла

(69) "МассивПодстрок.Количество()-2" - вот будет весело, если в массиве будет меньше 2 элементов)

Так чем вариант в (63) не подходит?

(69) Ага, только просил он в итоге по факту не это
Просто у него русский не родной

(71) Тем, что там вообще нет функции, возвращающей нужное соответствие

(63) "Если Найти(Стр, ":") Тогда"
заменить на:
"Если Найти(Стр, ":") > 0 Тогда"

Может ещё где навоял... Но важен алгоритм.

(70) даже если там только "Aaaa: ловыа ва лывоа", то все словится. меньше может быть только если нарушен формат ввода.

(74) >>Но важен алгоритм
Которого нет

(73) (76) В задаче в (0) на входе строка и на выходе либо строка разбитая на строки, либо несколько строк. Не описал тип возвращаемого значения автор. Поэтому я над этим даже не заворачивался.

(75) "если нарушен формат ввода." - обычное дело, если речь идет о строке, где ввод возможен в свободной форме.

(77) Ну да, ты как Геня, тот тоже не заморачивался, набросал говна какого-то и сойдет
Но у него хотя бы работает, это плюс

(79) А чуть поправить не бывает? :-)

ИсходнаяСтрока = "ыва: фыдофвдыаоф двао дфвлоадфоп вдлаоа: ывдопв аджоф фовыа фдова влаовло: ыдваоыдлвао дыоады вопы дао";
Подстрока = "";

МассивСтрок = СтрРазделить(ИсходнаяСтрока, " ");// тут пробел

Для Каждого Стр Из МассивСтрок Цикл

    Если Найти(Стр, ":") > 0 Тогда
        Сообщить(Подстрока);
        Подстрока = "";
    КонецЕсли;

    Подстрока = Подстрока +" "+ Стр;// тут тоже пробел

КонецЦикла;

Сообщить(Подстрока);

(80) Слушай, за вами всеми чуть править что-то нет никакого желания
Капец, если честно

(81) У тебя же синтаксис помощник есть...
А у меня под рукой ничего нет.

"Подстрока = Подстрока +" "+ Стр" тут точку с запятой добавить для порядку. Хотя ошибки не должно давать - последняя команда в блоке.

(80) Вы так и не поняли гениальную задумку ТС. Он на выходе хочет получить следующее
Структура=Новый Структура();
Структура.Вставить("Покупатель","Вася");
Структура.Вставить("Сумма","100");
Структура.Вставить("Валюта","рубль");
Вот такую структуру из строки:
ИсходнаяСтрока="Покупатель:Вася Сумма:100 Валюта:Рубль"

ИсходнаяСтрока = "ыва: фыдофвдыаоф двао дфвлоадфоп вдлаоа: ывдопв аджоф фовыа фдова влаовло: ыдваоыдлвао дыоады вопы дао";
Подстрока = "";

МассивСтрок = СтрРазделить(ИсходнаяСтрока, " "); // тут пробел
Для Каждого Стр Из МассивСтрок Цикл
    Если Найти(Стр, ":") > 0 Тогда
        Сообщить(Подстрока);
        Подстрока = "";
    КонецЕсли;
    Подстрока = Подстрока +" "+ Стр; // тут тоже пробел
КонецЦикла;

Сообщить(Подстрока);

(83) точнее не структура, а соответствие судя по ключам

(83) Ну так вместо СООБЩИТЬ() вставляй заполнение своей структуры:

НекаяСтруктура.Добавить(СтрПрошлая, Подстрока);

Ещё одну переменную добавить и усё.

Автор почему-то зациклился, что ":" это некий разделитель чего-то. На самом деле это признак начала блока. Разделитель тут как был пробел, так и остался. Просто слова с ":" являются началом очередного блока и не более того.

Повторю вопрос: "А зачем сначала делите на слова с разделителем ":"? "

(72) да я тоже понял, и пока вы тут умничали накидал стейдж2

инпут = "Aaaa: ловыа ва лывоа Bbb.bb: sdfkjfsd lksdf Cccc: kjlsdfl lsd";
МассивСлов = новый массив;
МассивПодстрок = СтрРазделить(инпут,":");
Для Итератор = 0 по МассивПодстрок.Количество()-2 Цикл
    ПромежуточныйМассив = СтрРазделить(МассивПодстрок.Получить(Итератор)," ");
    МассивСлов.Добавить(ПромежуточныйМассив.Получить(ПромежуточныйМассив.ВГраница()));
КонецЦикла;

аутпут  = новый Соответствие; ПрошлоеСлово = "";
Для Каждого ПодСтрока из МассивСлов Цикл
    НовоеЗначение = Сред(инпут,СтрДлина(ПодСтрока)+1+СтрНайти(инпут,ПодСтрока));
    Если ЗначениеЗаполнено(ПрошлоеСлово) Тогда
        аутпут.Вставить(ПрошлоеСлово,СтрЗаменить(аутпут.Получить(ПрошлоеСлово),ПодСтрока+":"+НовоеЗначение,""));
    КонецЕсли;    
    ПрошлоеСлово = ПодСтрока;
    аутпут.Вставить(ПодСтрока,СокрЛП(НовоеЗначение));
КонецЦикла;

(88) Повторю вопрос: "А зачем сначала делите на слова с разделителем ":"? "
Не пойму - какой в этом смысл?

(87) ну как бы да, но ладно.

(79) потому что мне нужно чтобы работала. Выписка или грузится или не грузится, это вам не Выписка Шредигера

(90) Прототип алгоритма в (84) пойдет?

(91) Шрёдингера, блять

(91) (93) это просто квинтэссенция Гения1с.

(93) буквоедство detected

(95) Да не, не, я не против
Чем больше ты неграмотный говнокодер, тем больше востребован я

(95) попробовал мой велосипед?

(0) А чем регэксп не пришелся? На всидку без проверки
.*\s(\S+)\:(.+)
Даст в $1 твой "параметр",$2 значение

(98) чепуха получается https://regex101.com/r/zvO4ED/1

(98) 1с не поддерживает регэексп, нужны ВК и т.п. Нафиг

(100) игнорируешь?

(101) я уже задачу решил и переписывать не буду. работает и ладно.

(102) А чего тогда спрашивал?

(103) думал кто быстро подскажет идею.

(104) А если не быстро подсказали, но по сути, то своё не переделываешь? :-)
А какой тогда смысл подсказывать, если всё сделаешь и всё равно будешь как-то по своему делать?

Проще подождать денёк. Ты напишешь - ну всё я по своему всё сделал. И так каждая ветка. Твой вопрос и твой единственный ответ. :-)

(105) На мой взгляд основная идея не получить верный ответ, а создать хайповую обсуждаемую топ тему, быть на слуху, получать как негативные комментарии, так и положительные. Ставить себя в центр обсуждений и т.д. Уверен что человеку с таким жизненным опытом вряд ли есть необходимость спрашивать какие либо бытовые вопросы по дому или решение простых не сложных алгоритмов на форме Мисты. А вот быть в центре внимания... С другой стороны в этом ничего плохого нет...

(106) И я к такому же выводу прихожу. Единственное есть темы когда автор голову реально ломает, а ему помогать не хотят, а по привычке занимаются его хайпом. Вот тут засада-то и притаилась. :-)

(106) ну я думал, что не срочно нужно решение, оставил темку, вдруг кто чего посоветует, но пришлось писать срочно самому. как-то так.

(108) самое сложное - не врать самому себе

(109) в этом хорошо помогает медитация. рекомендую

В общем, Геня опять создал Пашаветку

(111) А у него бывают другие?

(112) Да зря его из бана выпустили, Миста ничего не приобрела, нам и одного Паши хватало
Которого, кстати, тоже зря из бана выпустили
Примерно как прыщи, которые вылезают периодически, вроде как не смертельно, но некрасиво

хрен с ним, давайте осуждать (88)
или давайте починим (99)

каким образом мы можем валидировать ввод, чтобы (88) не загромождать тучей защит от кривых данных?

Тупой 1С )))