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

Gast wer

2014-03-06 13:29

Code (perl): (dl )

1
2
3

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

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