Thanks to everyone that answered this question.
I ended up using (/^.{30}\|[BNPG]\|/). I plan
on adding some more checks for "|" at specific
locations (other than just ^ and $, which
I have now) for sanity's sake.Thanks again. Would it be helpful to others if I were to post the complete script I've come up with so far? --J(K) -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
