At 18:28 2002.02.01, Booher Timothy B 1stLt AFRL/MNAC wrote:
>Hello out there - I have learned a lot of Perl today, but I am still trying
>to figure one more thing out.
> 
>How can I go through a file and extract all the text between certain
>delimiters - for example I have:
> 
>Bilbo, "Why I like rings" Freemont Press, 1998.
>Frodo, "Why I don't" Bridgedale Freemans, 1832
>Etc
> 
>I want to get:
> 
>Why I like rings
>Why I don't
> 
>It seems like there should be a real quick way to do this. . . thoughts?

Have a look at the module Text::Balanced, in particular at the function 
extract_delimited.

It is part of the standard ActivePerl distribution and I suppose it should also be 
included with the other distributions out there.

Best

-----------------------------------------------------------
Éric Beaudoin                <mailto:[EMAIL PROTECTED]>


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to