TPerlRegex sehr langsam

[luke2]

OK, Danke mach ich. Wenn das damit echt schneller geht, schmeiss ich das Perl Dings runter und mache es damit. :wink:

[mirage228]

Der obige Regex braucht hier nicht mal eine Sekunde (Das Schreiben ins Memo dauert aber ein paar Sekunden):

Delphi-Quellcode:

var
  M: IMatchCollection;
  N: TStringList;
  i: Integer;
begin
  N := TStringList.Create;
  with TStringList.Create do
  try
    LoadFromFile('ips.txt');
    with RegExCreate('(\d{1,3}(?>\.)){3}(?>\d{1,3})') do
    begin
      M := Matches(Text);
      for i := 0 to M.Count - 1 do
        N.Add(M.Items[i].Value)
    end;
    Memo1.Lines.Assign(N);
  finally
    Free;
    N.Free;
  end;

Hast Du nicht so etwas wie eines "Matches" Funktion bei TPerlRegEx, die alle Resultate auf einmal liefert?

Viele Grüße

[luke2]

OK, Danke. Kannst du die von dir umgeschrieben Unit für Delphi2010 evtl. noch kurz anhängen? Dann tausche ich das direkt in meinem Projekt aus. :)

[mirage228]

Moin,

Ich weiß grad nicht wie das Lizenz-technisch mit der Weitergabe der modifizierten Dateien aussieht, müsste ich morgen oder so mal schauen.

Aber die Konvertierung war echt simpel. Einfach alle Typen wie genannt ersetzt - sollte nicht länger als 30 Minuten dauern. Beispiele zur Verwendung der Unit findest Du übrigens in meinem PHP Inspektor-Projekt (siehe Link in der Signatur, da ist allerdings noch die alte DLL/Units der Bib dabei)...

Viele Grüße

[luke2]

Das wäre nett, wenn nicht wäre das auch nicht so schlimm, dann bastle ich mir das selbst zusammen. :)

Jedenfalls danke für die Hilfe.

[himitsu]

Zitat:

Zitat von luke2

Diese Komponente basiert doch auch auf der pcre.dll und kapselt nur die Aufrufe, deshalb verstehe ich nicht, wieso das so langsam ist :?:

Die pcre.dll kann nur Ansi/UTF-8 und dein Delphi ist Unicode,
da kommen dann noch einige UTF-8<->Unicode-Umwandlungen mit rein, aber so sehr sollten diese auch nicht ausbremsen, falls sie richtig platziert sind. :gruebel:

Oder wurde diese TPerlRegex im D2009/D2010-Port nur auf Ansi begrenzt? (hab noch nicht nachgesehn)

Aktuell kann eigentlich keine Lib nativ mit Unicode umgehn.

(selbst wenn es eine Ansi-Datei ist, wird dieser über die StringList nach Unicode umgewandelt)

@mirage228:
Wenn es eine OpenSource-Lib ist und man frei an die (Original)-Quellcodes rankommt, dann sollte es keine Probleme geben. Es müßte nur erwähnt werden, das es kein Original ist.

Oder du gibts nur eine Änderungsanweisung raus und jeder ändert es sich selber.