you likely need the multi line switch. change this:
my ($mso) = $row[2] =~ /(MS\d\d-\d\d\d)/i;
to:
my ($mso) = $row[2] =~ /(MS\d\d-\d\d\d)/si;
The /s makes it match through multi lines.
No, no, your understanding of the /s modifier appears to be a misconception.
It changes '.' to match any character, even a newline, which normally it would not match. Since there is no '.' in the above regex, the /s modifier does not make a difference. See "perldoc perlre".
-- Gunnar Hjalmarsson Email: http://www.gunnar.cc/cgi-bin/contact.pl
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>