Hi All,

I have a file that I need to be able to find a pattern match on one line then parse data on the next or subsequent lines - I will know which line needs to be parsed beforehand.

This is what I currently have:

Code:

while (<COMMAND_OUT>) {

   if ($_ =~ m/TEST/) {

      $enabled_yn{IMSI} = substr($_,-17,15) ;
   }

   if ($_ =~ m/BAOC/) {

      $enabled_yn{BAOC} = substr($_,-3,2) ;

   }

   if ($_ =~ m/BOIC/) {

      $enabled_yn{BOIC} = substr($_,-3,2) ;

   }
}

This works find when the string that I need to parse is on the same line but wont work when the string that I need to capture is on the next line.

I think the answer lies in manipulating $. but I'm unsure how to do this...

Many thanks,

pondlife.