Dateien nach bestimmten Zeichenketten durchsuchen - #173870 (Allgemeines zu Perl)

Gast wer

2014-03-06 12:59

ungetestet:

Code (perl): (dl )

1
2
3

while(  $str=~/(Collisionmonitoring\s+between\s+[^\(\)]+?\([\(\)]+\)\s+and\s+[^\(\)]+?\([\(\)]+\))\s(\w+)/sc  ) {
  print "FOUND $1 ===> $2\n";
}

Last edited: 2014-03-06 13:13:05 +0100 (CET)