1. Finding quotes
- Posted by Mike Sabal <MikeS at NOTATIONS.COM> Mar 28, 2000
- 480 views
I ran into this problem a while back and used a solution similar to this: atom done, sp,cp,ep done =3D 0 sp =3D find('\"',myseq) -- find first quote if sp =3D length(myseq) then done =3D 1 end if cp=3Dsp while not done do ep =3D find("\'",myseq[cp+1..length(myseq)]) if ep < 1 then ep =3D 0 done =3D 1 -- error elsif myseq[cp+ep-1]!=3D'\' then ep =3D cp+ep done =3D 1=20 else cp =3D cp + ep end if end while HTH, Michael J. Sabal