extracting strings as list from file

newbie dilema here. I would like to extract, from an EPS file, certain information as usable strings. Here is a snippet from the EPS comment header:

%!PS-Adobe-3.0 EPSF-3.0
%%Title: (E:\Nexus_Mac\NexusRip_6.5rev7a\Jobs\Job_4001\44343 4print-wrkP001.eps)
%%Pages: 1
%%BoundingBox: 0 0 1080 684
%%HiResBoundingBox: 0 0 1080 684
%%Creator: PCC RIP
%%DocumentData: Clean7Bit
%%DocumentProcessColors: Black
%%DocumentCustomColors: (PANTONE 1525 C)
%%CMYKCustomColor: 0 0.65 1 0.11 (PANTONE 1525 C)
%PCCProxyType: Composite PSTI
%PCCLink: (E:/Nexus_Mac/NexusRip_6.5rev7a/Jobs/Job_4001/J4001P001.tlw)

The info I want to work with is the DocumentProcessColors, DocumentCustomColors, and PCCLink.

For the curous, i am using a prepress system that pre-rips pages, producing a low-res “link” file that we use for imposing a project, which is where this EPS header comes from, and a hi-res ripped version that is substituted on output, which resides on the rip server at the location %%PCCLink. For archiving, I want to create a script that copies the hi-res from the server based on the PCCLink path

I am interested in the %%DocumentCustomColors because often, with spot color jobs, the ripped file may have a PANTONE CV or CVC color which Quark 5 or 6 reads only as PANTONE C. The color name mismatch produces an expensive, time wasting blank plate. If I had an easy way of being alerted to this I can prevent it (by renaming the color in QX before output)

This one may help:

set f to alias "path:to:sample.eps"

extracLineInfo("%%DocumentProcessColors: ", f) --> "Black"

to extracLineInfo(lineStart, theFile)
	do shell script "grep -e " & quoted form of lineStart & " " & (quoted form of POSIX path of theFile)
	texts ((count lineStart) + 1) thru -1 of result
end extracLineInfo