Kleines Problem mit StringRegExp.

**Raupi**

Servus.

Ich versuche gerade, mich mit Regulären Ausdrücken vertraut zu machen und spiele deshalb ein Bischen herum.
Ich möchte eine RegExp für IP Adressen haben, so universell wie möglich.

Spoiler anzeigen

[autoit]

#include <Array.au3>
$String = "kk191.168.1.115,192.168.001.000,d193.168.1.104 asder194.168.1.10AAssde 155.199.11.11 195.168.190.123.78"

[/autoit] [autoit][/autoit] [autoit]

$ergebnis = Stringregexp($String,"(?:\d{1,3}\.){3}\d{1,3}",3)
_ArrayDisplay($ergebnis)

[/autoit]

Ich hab es soweit hinbekommen, das alle IP Adressen ausgelesen werden. Aber halt auch 1 die keine sein kann, da sie aus 4 Zahlengruppen besteht. Wie kann ich verhindern das diese nicht gefunden wird.
autoit.de/wcf/attachment/7220/
Mein Problem ist das Elemente 5 ( 195.168.190.123.78 ) .

Hat jemand von den RegExp Cracks eine Lösung für mich?

**Schnitzel**

ich habs zwar geschafft aber es geht bestimmt wesentlich eleganter

aber bevor die RegExp-Cracks kommen hier meine lösung:

Spoiler anzeigen

[autoit]

#include <Array.au3>
$String = "kk191.168.1.115,192.168.001.000,d193.168.1.104 asder194.168.1.10AAssde 155.199.11.11 195.168.190.123.78"

[/autoit] [autoit][/autoit] [autoit]

$ergebnis = Stringregexp($String,"(?<![\.\d])((?:\d{1,3}\.){3}\d{1,3})(?![\.\d])",3)
_ArrayDisplay($ergebnis)

[/autoit]

was mir aber noch aufgefallen ist:
du schließt keine zahlen aus die größer als 255 sind. also 192.168.1.999 wäre bei dir ein match. sowas gibts aber eher selten *g*

nur gut dass ipv6 noch nicht standard ist. da wirds erst kompliziert

**Raupi**

Das mit dem dem negativen Lookahead und negativen Lookbehind hab ich zwar schon probiert, aber nicht hinbekommen.
Dank dir dafür. DIe Gültigkeit der Zahlen 0-255 innerhalb des Subsegments einer IP wird eine harte Nuss,
Mal schaun ob ich das hinbekomme, bei erlaubten 1 und 2 stellige Subsegmenten.Bei 3 stelligen wäre das kein Problem.

nuts

Da stellt sich die Frage ob es nicht sinnvoller ist die IP's in einem zweiten Schritt auf ihre Gültigkeit zu prüfen.
Noch zusätzlich auf 0-255 im Segment zu prüfen wird vermutlich nicht wirklich schnell sein.

Du willst aber RegExp üben oder?

**Xenobiologist**

Hi,

hier kannst du schauen, wie das geht mit den IP-Adressen.

http://www.regular-expressions.info/examples.html

Mega

**Raupi**

Danke für den Link Xeno, ist sehr interessant.

SEuBo

Zitat von Raupi

DIe Gültigkeit der Zahlen 0-255 innerhalb des Subsegments einer IP wird eine harte Nuss,

[autoit]

#include <Array.au3>
$String = "kk191.168.1.115,192.168.001.000 ,d193.168.1.104 asder194.199.1.10AAssde 155.199.11.11 195.168.190.123.78 550.300.2.150 hallo 250.249.1.001 192.168.001.000"

[/autoit][autoit][/autoit][autoit]

$ergebnis = Stringregexp($String,"(?<![\.\d])((?:25[0-5]\.|2[0-4][0-9]\.|[01]?[0-9][0-9]?\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)(?![\.\d]))",3)
_ArrayDisplay($ergebnis)

[/autoit]

Zitat

Ich versuch mal den RegExp für dich zu übersetzen:

(?<![\.\d])((?:25[0-5]\.|2[0-4][0-9]\.|[01]?[0-9][0-9]?\.){3}(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?)(?![\.\d]))",3)

(?<![\.\d]) => Negativer Lookbehind aus dem alten Regex

(?: => Klammern, ohne direkt ein Subpattern zu erstellen.

25[0-5]\.| => Eine Zahl von 250-255 mit nachfolgendem ".", oder
2[0-4][0-9]\.| => Eine Zahl von 200-249 mit nachfolgendem ".", oder
[01]?[0-9][0-9]?\. => Eine Zahl von 0-199. Nur hier können 1 oder 2 stellige Zahlen vorkommen. Mithilfe von ? können wir 2 "Stellen" optional schalten; Diese Ziffern _können_, aber _müssen_ nicht sein.

){3} => das ganze 3 mal.

(?:25[0-5]|2[0-4][0-9]|[01]?[0-9][0-9]?) => Das gleiche wie grade, nur ohne nachfolgende Punkte.

(?![\.\d])) => Negativer Lookahead

Alles anzeigen

**Raupi**

Dank dir SEuBo.

Mein Problem bei RegExp war, ich hab die deutsche Hilfe dazu gelesen und das TuT von BugFix. Beim Probieren hat nix geklappt, weil die Befehle für positivem Lookahead und Lookbehind bei beiden nicht stimmen.
Die Fehler haben mir fast die Lust auf Reguläre Ausdrücke vermiest. Wenn ich heute nicht mit RegExBuddy rumgespielt hätte, wären RegExp für mich gestorben. Ist auch blöd wenn man mit falschen Infos arbeitet. :wacko:

GerhardSchr

ich kann ja auch mal in meinem perl kochbuch schauen, da war ein beispiel ist zu ip drinne...werde ich dann mal zuhause posten (wenn ich daran denke :))

Gruß
GerhardSchr