in reply to Regex, loops and subs

Note that the result I get from running your code as supplied (except that I changed the read loop to read from __DATA__) is:

Am. J. Med. Genet.[JO] AND 1983[DP] AND 15[VI] AND 39[PG] Teebi, A. S.; Rucquoi, J. K.; Meyn, M. S.: Aarskog syndrome: report of + a family with review and discussion of nosology. Am. J. Med. Genet.[ +JO] AND 1993[DP] AND 46[VI] AND 501[PG] Am. J. Med. Genet.[JO] AND 1993[DP] AND 46[VI] AND 501[PG]

which is slightly different to the sample you provided. I suspect that that is not important, but you should confirm that that is the case.


Perl is Huffman encoded by design.

Replies are listed 'Best First'.
Re^2: Regex, loops and subs
by Hena (Friar) on Nov 15, 2005 at 11:13 UTC
    Yes. There is a parsing error. However my main problem is the speed. That error should be sufficiently easy to fix. I only pointed out the format that I wanted.