RegExp Разделить строку по пробелу игнорируя между кавычками, игнорируя кавычки внутри слова

[liond66]

1.Нужно получить в массив строку с разделителем пробел.
2.Между словами в кавычках исключить разделение (только если кавычки в начале слова и заканчивается в конце слова).
3.Если кавычки есть в середине слова, оставить как есть.

Пока нашёл вот так, но третье условие не выполняется. Кто поможет?

#include <Array.au3>
$sTest = 'строка1 "стро ка2" стро"ка3 стро"ка4'
$aRet = StringRegExp($sTest, '(?:[^" ]++|"[^"]*+")++', 3)
_ArrayDisplay($aRet)

Нужно получить:
строка1
"стро ка2"
стро"ка3
стро"ка4

 

[sngr]

$sRet = StringRegExp($vTest, '(?<=^| )(?:"[^"]*+\b"|[^ ])*+', 3)

 

[liond66]

Спасибо.
Это работает для данного примера.
Но если убрать цифры, то уже не работает.

$sTest = 'строка "стро ка" стро"ка стро"ка'

Мне нужно с любым сочетанием и количеством слов.

 

[xXx]

Потестируйте:

StringRegExp($sTest, '(?:\h|^)"(.+?)"(?:\h|$)|\H+', 3)

Пос #

 

[sngr]

$str=StringRegExp($file, '(?<=^| )(?:"[^"]*+"|[^ ]*)*+', 3)

 

[liond66]

xXx
Падает на

$sTest = '"стро ка1" "стро ка2"'

sngr
Падает на

$sTest = '"a"bc def" "sdfg hj"g"'

Нужно получить:
"a"bc def"
"sdfg hj"g"

После кавычки являющейся первым символом слова и до следующей кавычки являющейся последним символом слова, взять как есть.
Остальную часть разбить по пробелам.

 

[xXx]

$aRet = StringRegExp($sTest, '(?<=\h|^)"((?:.(?!\h"\H))+?)"(?:\h|$)|\H+', 3)

 

[Tempo]

#include <Array.au3>

Global $sTest = 'строка1 "стро ка2" стро"ка3 стро"ка4 ' & _
        'строка "стро ка" стро"ка стро"ка ' & _
        '"a"bc def" "sdfg hj"g" ' & _
        '"qwe" qe"' ;Какое поведение вы ожидаете с таким вариантом?
Global $aRet = StringRegExp($sTest, '".*?"(?= |$)|[^ ]+', 3)
_ArrayDisplay($aRet)

 

[liond66]

Посдедний вариант от xXx почти как нужно, но убирает кавычки.
Наверняка его можно использовать во многих случаях.

Вариант от Tempo именно то, что я хотел!

Какое поведение вы ожидаете с таким вариантом?

Правильный вопрос.
Я буду использовать это в качестве параметров при запуске скомпилированного скрипта.
По ходу будет видно, может внутренние кавычки заменю на одинарные. Или наоборот.
В любом случае это универсальное решение.
Спасибо всем!

 

[xXx]

убирает кавычки

Так и задумано, все строки гарантированно без обрамляющих двойных кавычек.
К тому же в варианте от Tempo вам придется удалять лишние конечные пробелы.

 

[Tempo]

придется удалять лишние конечные пробелы.

И правда. Сообщение выше поправил. Сделайте так чтобы их убрать.

'".*?"(?= |$)|[^ ]+'

 

[liond66]

xXx
Для командной строки кавычки как раз нужны!
Спасибо за замечание про пробелы. Учту.

И да, Ваш ответ я тоже лайкнул!

 

[xXx]

А какой результат должен быть при таком раскладе?

$sTest = '"строка1 "стро ка2"'

 

[liond66]

А какой результат должен быть при таком раскладе?

$sTest = '"строка1 "стро ка2"'

Без изменений. После нахождения кавычек как первый символ слова, ищутся кавычки как последний символ слова.
В данном случае Ваш вариант не сработает.
Код от Tempo работает.
Спасибо за пример.

Сообщение автоматически объединено: 1 Май 2020

Сейчас дошёл до понимания, что кавычки для передачи параметров конечно нужны, но при парсинге они уже не нужны.
Конечно не проблема убрать в каждом элементе массива кавычки в начале и конце,
но для чистоты эксперимента: как переделать код от Tempo, чтобы убирал кавычки,
те которые в начале слова и в конце слова, но не в середине слова?

 

[Tempo]

'"(.*?)"(?: |$)|[^ ]+'

 

[liond66]

То что нужно. Благодарю.

 

[xXx]

В данном случае Ваш вариант не сработает.

Я знаю, тут ориентировался на свой опыт с кавычками и отошел от ТЗ. Поэтому мой вариант вам не подходит.