At 08:28 -0700 10/06/2011, Gurpreet Singh wrote:

Correct me if i am wrong -

$read = 0 unless /\s[A-Z]{3}:/;
This might pick up wrong values also - since one of the DBLINKS data (the first record) might also get picked up - it should match this regex.

Run my script with the data and see. $read is already false at that point. If the data were differently arranged then maybe, but I was not proposing a universal solution - just a suggestion as to a different approach.

JD



--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to