Серый форум — AHK: Поиск в буфере обмена по нескольким регекспам

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (stokber) — Sat, 02 May 2020 19:56:26 +0000

serzh82saratov
Пока писал-отправлял последний пост пришло ваше сообщение. На мониторе в Notepade++ в двух областях экрана были окрыты оба скрипта. Таскал оттуда-сюда регекспы для теста и по-видимому натаскал лишнего.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (stokber) — Sat, 02 May 2020 19:42:55 +0000

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

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (serzh82saratov) — Sat, 02 May 2020 19:33:18 +0000

Так не работало, и решили от себя добавить?


str := ".1233cdABCD123"
oPatterns := [

	, ["r1_Прописные буквы", "AB"]
;	, ["r2_строчные буквы", "cd", "i"]
;	, ["r3_Точки", "\."]
	, ["r4_Числа", "\d+"]]
 
for k, v in oPatterns 
	patterns .= "((*:" v[1] ")" . (v[3] ? "(?" v[3] ")" : "") . v[2] ")|"  
	
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)
c := StrSplit(Match.Mark, "_")

MsgBox, % "шаблон: " c[1] "`nКомментарий: " c[2]  "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (serzh82saratov) — Sat, 02 May 2020 19:24:33 +0000

Опять ничего не понял. Ощущение что есть проблемы, но я о них сам должен догадаться.
Это откуда?


	patterns .= "((*:" v[1] ")" . (v[3] ? "(?" v[3] ")" : "") . v[2] ")|"  
	patterns .= "((*:" k ")" v ")|"

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (stokber) — Sat, 02 May 2020 19:17:21 +0000

Почему-то решил, что это фича такая.
Проверил ещё раз. Неправильно указал характер ошибки. При закомментировании одного из регекспов сработало не корректно. В сообщении были только номер шаблона и позиция. Комментарий и строка — пусто. Недостаточно тщательно проверил и наверное сделал неправильные выводы. Причина, кажется, в том, что в моем случае осталось всего два рабочих регекспа:

str := ".1233cdABCD123"
oPatterns := [

	, ["r1_Прописные буквы", "AB"]
;	, ["r2_строчные буквы", "cd", "i"]
;	, ["r3_Точки", "\."]
	, ["r4_Числа", "\d+"]]

for k, v in oPatterns 
	patterns .= "((*:" v[1] ")" . (v[3] ? "(?" v[3] ")" : "") . v[2] ")|"  
	patterns .= "((*:" k ")" v ")|"
	RegExMatch(str, "O)" RTrim(patterns, "|"), Match)
c := StrSplit(Match.Mark, "_")
MsgBox, % "шаблон: " c[1] "`nКомментарий: " c[2]  "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value

Каюсь.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (serzh82saratov) — Sat, 02 May 2020 18:40:06 +0000

Скорее последнее.
Почему нельзя сразу сказать об этом, и привести скриншот ошибки?
Или код который не работает.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (stokber) — Sat, 02 May 2020 18:32:17 +0000

Я попробовал добавить в "Opatterns" из 18-го поста ещё регулярных выражений, скрипт заругался. Очевидно, нужно править ещё и "patterns". В случае кода из 17-го, скрипт сразу стал искать новые совпадения без каких либо правок в "patterns". Поэтому я и предпочел код из 17-го. Или я по своей дремучести что-то не понял?

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (serzh82saratov) — Sat, 02 May 2020 17:49:04 +0000

Ничего не понял из вашего ответа, но к «А-ЯЁ» вписать по моему проще "i", чего вы и хотели добиться, а сейчас вдруг перехотели.

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (stokber) — Sat, 02 May 2020 17:45:17 +0000

serzh82saratov
Ну, я как-то так и подумал. Но надежда теплилась… Для меня предпочтительнее все-же при отладке и наполнении регекспами не править "patterns"и не путаться там при большом количестве регулярок. Проще лишний раз «А-ЯЁ» вписать. Огромное вам спасибо!

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (serzh82saratov) — Sat, 02 May 2020 17:13:13 +0000

Так вы зачем из 17 код берёте, если про ключи (Опции) я только в 18 упоминаю.


oPatterns := [
	, ["r2_Прописные буквы", "AB"]
	, ["r1_строчные буквы", "cd", "i"]
	, ["r3_Числа", "\d+"]]

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (stokber) — Sat, 02 May 2020 16:13:11 +0000

serzh82saratov пишет:

oPatterns := {"r1`nстрочные буквы": "cd"
			, "r2`nПрописные буквы":"ab"
			, "r3`nЧисла": "\d+"}

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

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (serzh82saratov) — Sat, 02 May 2020 13:25:22 +0000

Опции можно добавить в третьем параметре шаблона.


str := "CDcd1233cdABCD123"

oPatterns := [
	, ["r2_Прописные буквы", "AB"]
	, ["r1_строчные буквы", "cd", "i"]
	, ["r3_Числа", "\d+"]]

for k, v in oPatterns 
	patterns .= "((*:" v[1] ")" . (v[3] ? "(?" v[3] ")" : "") . v[2] ")|"  
	
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)
c := StrSplit(Match.Mark, "_")

MsgBox, % "шаблон: " c[1] "`nКомментарий: " c[2]  "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (serzh82saratov) — Sat, 02 May 2020 13:12:02 +0000

stokber пишет:

перелицевал вот таким образом

Тогда уж так:


str := "CDcd1233cdABCD123"

oPatterns := {"r1`nстрочные буквы": "cd"
			, "r2`nПрописные буквы":"ab"
			, "r3`nЧисла": "\d+"}

for k, v in oPatterns
	patterns .= "((*:" k ")" v ")|"
	
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)

MsgBox, % "шаблон: " Match.Mark "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (stokber) — Sat, 02 May 2020 13:01:45 +0000

Спасибо! Для себя перелицевал вот таким образом:

str := "CDcd1233cdABCD123"
r1 := "(*:r1#строчные буквы)cd"
r2 := "(*:r2#Прописные буквы)AB"
r3 := "(*:r3#Числа)\d+"
oPatterns := [r1, r2, r3]
for k, v in oPatterns
	patterns .= "(" v ")|"
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)
loop,parse, % Match.Mark, #
	c%A_Index%:=A_LoopField	
MsgBox, % "Шаблон: " c1 "`nКомментарий: " c2 "`nПозиция: " Match.Pos "`nДлина: " Match.Len "`nСтрока: " Match.Value

И два вопроса не дают покоя.
1. Хотел исхитриться, хоть и не очень на это и надеялся, отдельным регекспам присвоить ключи регистронезависимости i). Пришел к выводу, что это невозможно. Или всё-таки?
2. И в связи с п.1 и не только… Изначально решил пойти путем создания одного большого регулярного выражения с альтернативами. Вопрос: существует ли в AHK возможность сделать шаблоны соответствия более независимыми друг от друга, чтобы они могли иметь свои ключи и пополнялись бы простым добавлением и исключались бы комментированием?

Re: AHK: Поиск в буфере обмена по нескольким регекспам

null@example.com (serzh82saratov) — Thu, 30 Apr 2020 06:15:50 +0000

teadrinker
Не знал про Mark. Можно ещё так обернуть, для удобства добавления, и выводить например сам шаблон если нужно.

str := "123abcd"

oPatterns := ["cd", "ab", "\d+"]

for k, v in oPatterns
	patterns .= "((*:" v ")" v ")|"
	
RegExMatch(str, "O)" RTrim(patterns, "|"), Match)

MsgBox, % "шаблон: " Match.Mark "`nпозиция: " Match.Pos "`nдлинна: " Match.Len "`nстрока: " Match.Value