[Redisych]

Вы скажите, чего хотите добиться своим кодом. Пока вижу, что паттерн не подходит совершенно.
А строки с переносом спецсимволом \n кодируются, либо да, в массив.

[Creat0R]

Почему это альфа вдруг буквы не показывает? А паттерн {x} сам себя размножает. »

Я этими классами вообще не пользуюсь, предпочитаю их аналоги (в виде [a-z] и т.п.).

как создать тест с переносом строк внутри кода »

При замене? нужно добавлять @CRLF.

[semiono]

Тут написано

(?s) . matches anything including newline. (by default "." don't match newline)

хотел посмотреть как это работает.

либо да, в массив. »

Покажите пример?

Вы скажите, чего хотите добиться своим кодом »

Я хочу "пройти" все интересные с практической стороны паттерны, чтобы уметь пользоваться ими.

Вообще меня интересует поиск и замена строк, но хотя StringRegExpReplace это только и делает.

Redisych, загляните в этот пост, я хоть тему закрыл, но не решённым осталось
http://forum.oszone.net/post-1545134-29.html
там суть в том что надо найти одну строку, а изменить другую. Либо весь текст выстроить в строку
и править в StringRegExpReplace
Конкретно целевую строчку нельзя задавать в поиске, потомучто в файле таких строк
много, а уникальное имя получается что в строке выше.

Что-то мы отвлеклись... Давайте лучше примеры, хоть чтонибудь попроще? Или ссылку на примеры...
Ато я так никогда не научусь паттерновому мышлению.

$s = StringRegExpReplace("ab12", "[a-z]","1")
А так действительно работает! Зачем же тогда нужно [:alpha:], ну уже хоть что-то получилось!

[Redisych]

У себя нашёл обратную функцию

Код:

;Содержимое массива Длинная Строка в одну строку  
For $stroka = 1 To $strokVBloke

 MsgBox(0, $stroka &" cтрока такая:", $ArrayDlinStroka[$stroka] ) 
 
$Message = ($Message & $ArrayDlinStroka[$stroka])
Next

Сейчас поищу, как строки в массив засунуть.

[semiono]

А как можно файл построково читать, чтобы сравнивать строки с шаблоном?
Понятное дело надо найти @CRLF, только как ?

Я думаю можно организовать как цикл через
If <проверка строки с образцом> then <идти дальше или заменить>
что-то типо того.

[Redisych]

Код:

      If $strokVBloke > 1 Then; если строк больше одной
         ;Заносим в массив последнюю строку, с 1-го символа и до ограничения 
         $ArrayDlinStroka[$strokVBloke] = StringMid ($CurrentLine, 1, $ZnakKonecPost )
      EndIf

Код:

      ;ПРИБАВЛЯЕМ ПО ОДНОЙ СТРОКЕ, ЗАПИСЫВАЯ В МАССИВ, ПОКА НЕ НАЙДЁМ КОНЕЦ
      While $NumCurrentLineFileInput <= $chisloStrokCurrentFile
         ;Смотрим, кончается ли строка конечным вхождением
         ; ИЩЕМ КОНЕЦ СООБЩЕНИЯ!
         ; Устанавливаем искомую строку 
         $entry = 'что-то там'
         ; регистр не важен, т.к 'что-то там' бывает маленькими
         ;Читаем строку № $NumCurrentLine из файла $fileIn
       $CurrentLine = FileReadLine ( $fileInput, $NumCurrentLineFileInput ) 
       ;Ищем вхождение  $entry с учётом регистра или без
       $entryFound = StringInStr ($CurrentLine, $entry , 0 , 1 )


            If $entryFound > 0 Then
               If $strokVBloke = 1 Then; если вхождение найдено в 1-й строке
                  ;Считаем конец
                  $StrokaKonecPost = $NumCurrentLineFileInput
                  $ZnakKonecPost = $entryFound - 20
                  ;Заносим в массив единственную строку
                  $ArrayDlinStroka[$strokVBloke] = StringMid ($CurrentLine, $ZnakNachaloPost, $ZnakKonecPost) 
               EndIf   
               ExitLoop ;выход из цикла, если вхождение найдено
            EndIf
            ;MsgBox (0, "Вхождение?", $entryFound)
            If $strokVBloke = 1 Then; если вхождение найдено в 1-й строке
               ;Заносим в массив первую строку (ограничение сначала)
               $ArrayDlinStroka[$strokVBloke] = StringMid ($CurrentLine, $ZnakNachaloPost) 
            Else 
               ;Заносим в массив строку без ограничения по длине
               $ArrayDlinStroka[$strokVBloke] = StringMid ($CurrentLine, 1 ) 
            EndIf   

         ;MsgBox (0, "Строка в массиве", $ArrayDlinStroka[$strokVBloke])

         ;увеличиваем счётчики 
         $strokVBloke = $strokVBloke + 1
         $NumCurrentLineFileInput = $NumCurrentLineFileInput + 1

      WEnd

[Creat0R]

хотел посмотреть как это работает. »

Код:

$sData = 'Some text' & @CRLF & 'The End'
$sRet = StringRegExpReplace($sData, '(?s)\w+ (.*) End', '\1')
ConsoleWrite($sRet & @LF)

Если убрать (?s), то поиск провалится, т.к под .* попадёт любой символ кроме перевода строки, а перед ним нет вхождения End.

[semiono]

а что значит заменить на '\1'


---
"Match any "word" character: a-z, A-Z, 0-9 or underscore (_)."
Проверка букв из слов
Что-то у них слишком много паттернов того что очевидно, но только наоборот сбивающих с толку.

Повторов тоже что-то много.
"Repeat the previous character, set or group 0 or more times."
а это буквально значит ноль или более раз
Причём ещё и эквивалентно другому паттерну ;-
ато нам одного этого не хватит )))

Интересно было бы русскую справку почитать, пойду поищу.

Моя идея с поиском конца строки, тоже не клеится, так как мне никто не будет возвращать
ни строку перед @CRLF ни её длину. Функции какие-то ограниченные. Подходящего ничего не вижу.

Впрочем, FileReadLine меня заинтересовала, надо потестировать это...
Ух! Она читает по строкам! Спасибо, Redisych за подсказку!

[semiono]

А как можно StringRegExp() часть строки протестировать? Сравнить с шаблоном.
[пробелы в начале] [нужная часть строки] [не нужная часть строки]
Пробелы вначале можно убрать так (?m) или точкой . Далее не знаю...
Строка содержит < скобки > слеш / "двойные кавычки" равно = и буквы... ASCII вобщем, поправте если ошибаюсь?