Suche Workaround RegExp Repeating Character Pattern Limit

#include <Array.au3>

$sString = "[abc],[def],[ghijklm],[nopq],[r],[s],[tuvwx],[yz],[12345],[6789],[10]"
$iMaxLen = 15

$aStringRegExp = StringRegExp($sString, "\[.{1," & $iMaxLen - 2 & "}\],??", 3)

_ArrayDisplay($aStringRegExp)

$iMaxLen = 65537+1 ; hier is die grenze bzw. bei 65535

$aStringRegExp = StringRegExp($sString, "\[.{1," & $iMaxLen - 2 & "}\],??", 3)

_ArrayDisplay($aStringRegExp)

Mein Idee war dem Pattern "." irgendwie zu ersetzten mit einem Pattern der auch für alle Zeichne steht aber gleich mehrere Zeichen erzwingt.

Also "." durch ".{10}" ersetzen dann könnte ich $iMaxLen 10 x kleiner machen.
aus
"\[.{1," & $iMaxLen - 2 & "}\],??"
wird
"\[.{10}{1," & $iMaxLen - 2 & "}\],??"
Leider funktioniert das verschachteln von Pattern so nicht.

Den String splitten mit der Möglichkeit die maximale Anzahl Zeichen für die Stücke anzugeben.
Dabei darf der String nur an bestimmten Stellen geteilt werden damit die Stückchen nicht unbrauchbar werden.
Es darf also nur bei , geteilt werden.
Der echte spring ist tausende Zeichen lang deshalb der Beispiel String zum zeigen wie der zusammengesetzt ist.

Es soll also genau dass machen was es tut nur eben mit mehr Zeichen.

Zitat von Oscar

Dann teil doch bei jedem Komma

[autoit]

"\[.+?\]"

[/autoit]

und setze die einzelnen Teilstücke nach belieben wieder zusammen.

Dann muss ich den String zuerst in hunderte Stücke teilen danach wieder aneinander reihen und bei jedem hinzugefügten Stück die Gesamtlänge mit der gewünschten Maximallänge vergleichen und wenn überschritten wider ein Stück weg nehmen. Und das so lange bis keine Stücke mehr da sind :wacko:

Zitat von BugFix

So richtig kann ich dir nicht folgen.
Du hast einen String, tausende Zeichen lang mit Gruppen von"[irgendwas]" getrennt durch Kommata - richtig?
Und was ist jetzt der Knackpunkt, was macht es unmöglich den Teil zwischen den Klammern abzufragen? Ich sehe da kein Hindernis.

Richtig soweit. Der Knackpunkt ist dass ich möglichst viele dieser [irgendwas] aneinander haben will aber nicht mehr Zeichen als angeben als $iMaxLen

Zitat von BugFix

Alternativvariante:
- Lösche alle "[" "]" und ","
- übrig bleibt der gewünschte Inhalt
- jetzt häckseln in Teile fester Länge

[autoit]

$s = StringRegExpReplace("DEIN_STRING", "[\[\],]", "")
$aMatch = StringRegExp($s, ".{1, " & $iMaxLen & "}", 3)

[/autoit]

Erstens bleibt hier das Limit genau gleich $iMaxLen kann auch hier nicht grösser als ~65500 sein.
Zweites wird dadurch doch auch innerhalb von [] geteilt bzw. es wird alles aneinander gehängt und eine Trennung nur beim Koma ist nicht mehr möglich.
Das Problem ist dass $iMaxLen nicht grösser sein kann. Der Patter in meinem Beispiel würde sonst genau das machen was er soll.

Nochmals zur Aufgabe.
Der String enthält viele Teilstrings unterschiedlicher Länge welche erhalten bleiben müssen.
Es darf also nur beim Komma getrennt werden.
Es soll nach so vielen Teilstrings getrennt werden dass der String möglichst genau die Länge $iMaxLen hat.

Bsp.

String: "Teilstring,Nocheiner,Ich-bin-ein-Teilstring-und-muss-zusammen-beliben,Ich-bin-das-auch-aber-kürzer,ich-auch-sogar-mit-z4hlen,blablabla,loremipsum,usw und so fort"

Maxlen = 25
Also trennen nach 25 zeichen
"Teilstring,Nocheiner,Ich-bin-ein-Teilstring-und-muss-zusammen-beliben,.....

Aber halt da darf nicht getrennt werden also trenne beim vorherigen Komma.

"Teilstring,Nocheiner,Ich-bin-ein-Teilstring-und-muss-zusammen-beliben,....

Also das Grüne im Array speichern und mit dem übrigen String das Gleiche mach so lange bis nichts mehr übrig ist.
MaxLen ist dabei immer länger als der längste Teilstring so das sicher jeder Teilsting verarbeitet wird.

Zitat von bollen

in der vollständigen beschreibung der PCRE Pattern steht was den fehlschlag erklärt wen die 2 zahl größer ist.

ich würde die Maximalanzahl der Zeichen so umgehen das ich einfach 2x den Ausdruck hintereinander verwende. Ceiling und Floor müssten die .5 bei ungeraden Zahlen beheben. (ungetestet)

[autoit]

StringRegExp($string ,"\[.{1,"&Ceiling($MaxLen/2)&"}.{1,"&Floor($MaxLen/2)&"}\],??",3)

[/autoit]

natürlich

Genau das Limit ist das Problem dass steht da schon im ersten Post seit immer^^.
Der Pattern einfach zu wiederholen macht leider nicht das selbe.
Zwischen MaxLen und der tatsächlichen Länge gibt ja mit sehr grosser Wahrscheinlichkeit einen Unterschied. Der String ist zu 99% ein bisschen kürzer. Diese Differenz summiert sich bei verdoppeln des Patterns logischerweise. Die Differenz kann also zusammen länger sein als der nächste Teilstring.
Zudem müsste ich den Pattern nicht doppelt haben sonder eher 10-30 mal damit ich zuverlässig die 65000 Limit nicht überschreite.
Auch müsste man die wiederholten Pattern noch optional machen denn der letzte String kann ja aus nur einem Teilstring bestehen und würde bei doppeltem oder gar 10 fachem Pattern dann kein Mach mehr geben.

Das genau gleiche würde ich erreichen indem ich MaxLen halbieren und jeweils 2 Stringes wieder zusammen hänge. Damit gäbe es auch kein Problem wenn am Schluss nur ein Teilstring übrig ist. Die Abweichung summiert sich jedoch auch bei dieser Variante und bei 10-30 mal macht das schon was aus.

Aber es sieht wohl so aus also ob es keine andere Möglichkeit gibt. Jede Programmiersprache hat seine Grenzen. Bei AutoIt sind sie leider manchmal schnell erreicht. Aber gut kann man Arrays mit 64 Dimensionen machen .

Weitere Lösungen oder Tims sind natürlich erwünscht.

Hab mich noch nie mit Lua befasst. Ob ich dass in meinem Script verwenden könnte kann ich also nicht sagen.
Wenn du trotzdem ausprobieren willst interessant wäre es jedenfalls =).

Echte Daten hab ich hier keine und wäre auch nicht wirklich geeignet zum Posten. Aber der Inhalt Ist Text also deutsche Zeichen wie in der Zeitung.

Getestet hab ich damit. dass erzeugt ein vergleichbaren String.
ca. 830'000 Zeichen lang. Also nur ~800 KB. Sind für heutige Verhältnis gar keine gossen Datenmengen die 65'000 Limit ist einfach mager.
Dauert auf meinem i7 ca. 30 Sekunden und 60 MB RAM zu generieren.

#include <Crypt.au3>

$String = ""
For $i = 0 To 10000
$Random = Hex(_Crypt_HashData(Random(0, 999999999999), $CALG_MD5))
$Random = StringTrimLeft($Random, Random(0, 32, 1)) & StringTrimLeft($Random, Random(0, 32, 1)) & StringTrimLeft($Random, Random(0, 32, 1)) & StringTrimLeft($Random, Random(0, 32, 1)) & StringTrimLeft($Random, Random(0, 31, 1))
$String &= "[" & $Random & "],"
Next
ConsoleWrite($String & @CRLF)
ConsoleWrite(StringLen($String) & @CRLF)

Exit

Vielen Dank für beiden Lösungsvorschläge. Werde mir die mal anschauen und austesten =).

Setze den Thread mal auf [gelöst]