Select Code to Download

2011-04-03 09:37:12.129 (INFO, ICELineHandler.cpp:339) Product Def Mar
+ketID 90120253, Symbol 'BRN FMU0012_OMCA0000118502081312'
2011-04-09 21:32:15.525 3509,3523: Gap detect on 233.156.208.41:20041 
+from 2746318 to 2746373, moving to next message
2011-04-09 21:32:15.585 3509,3523: Gap detect on 233.156.208.41:20041 
+from 2746420 to 2746475, moving to next message
2011-04-09 21:32:15.639 3509,3522: Received data on ConnectionICE-Opti
+ons. Pending=214044. 
2011-04-03 09:37:12.129 (INFO, ICELineHandler.cpp:339) Product Def Mar
+ketID 90120253, Symbol 'BRN FMU0012_OMCA0000118502081312'

#!/usr/bin/perl

use strict;
...
                              '214333'
                            ]
        };

while ( $line = <LOG> ) {
unless (($data[10] =~ m/Pending=/) || ($data[6] =~ m/Gap/)) { next; } 
+# skip elements we don't want
...
                   $line = "$data[1],$data[10]";
                }
   }

m/(?:Pending=)(\d{6})$/ # If you want the number after 'Pending'.

m|\s(\d\d:)+(\d){2}\.(\d){3}\s| # To match the time stamp.