Advertisement

05.21.2008 at 07:06AM PDT, ID: 23420860
[x]
Attachment Details

Perl seek/tell to skip forward once a string has matched

Asked by rickyr in Perl Programming Language

Tags: Perl

Hello all

I am trying to write a script that can search through a file from begining to end.
As it steps through the file it will look  for the following string....."Flushing".
When the string has been found it should skip forward to the string....
"End processing job LC21.1ST.xxx.017.CMYK at 17:23:45"
then the script should carry on looking for the next "Flushing" message.

Could someone start me off along the correct lines please?
See below for sample of the file to search in.

cheers

.......Ricky





MagProof: Post-processing command C:\JPS_Data\MagProof.cmd LC21.1ST.xxx.002.CMYK.pdf C:\JAWSOUTPUT\MagProofOut\SYSTEM\
MagProof: End processing job LC21.1ST.xxx.002.CMYK at 17:23:40
MagProof: Start processing job LC21.1ST.xxx.017.CMYK at 17:23:44
MagProof: %%[ Error:
MagProof: undefined
MagProof: ; OffendingCommand:
MagProof: ÅÐÓÆ¿Þ
MagProof:  ]%%
MagProof: %%[ Flushing: rest of job (to end-of-file) will be ignored ]%%
MagProof:
MagProof:
MagProof: Post-processing command C:\JPS_Data\MagProof.cmd LC21.1ST.xxx.017.CMYK.pdf C:\JAWSOUTPUT\MagProofOut\SYSTEM\
MagProof: End processing job LC21.1ST.xxx.017.CMYK at 17:23:45Start Free Trial
[+][-]05.21.2008 at 07:38AM PDT, ID: 21615536

At Experts Exchange, members can ask their questions to thousands of technology professionals, also known as Experts. Experts compete and collaborate to answer those questions by leaving comments like this one.

Start your 7-day free trial to view this Expert Comment or ask the Experts your question.

 
[+][-]05.21.2008 at 08:01AM PDT, ID: 21615803

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
[+][-]05.21.2008 at 08:06AM PDT, ID: 21615852

At Experts Exchange, members can ask their questions to thousands of technology professionals, also known as Experts. Experts compete and collaborate to answer those questions by leaving comments like this one.

Start your 7-day free trial to view this Expert Comment or ask the Experts your question.

 
[+][-]05.21.2008 at 08:15AM PDT, ID: 21615923

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
[+][-]05.21.2008 at 09:10AM PDT, ID: 21616500

View this solution now by starting your 7-day free trial. Setting up your free trial is quick, easy, and secure. We will return you to this solution, unlocked, when you're done.

 

About this solution

Zone: Perl Programming Language
Tags: Perl
Sign Up Now!
Solution Provided By: Adam314
Participating Experts: 1
Solution Grade: A
 
 
[+][-]05.21.2008 at 09:23AM PDT, ID: 21616637

Often, when Experts are collaborating with members who have asked questions, they will request additional information about the problem. Askers respond with an author comment like this one.

Start your 7-day free trial to view this Author Comment or ask the Experts your question.

 
 
Loading Advertisement...
20080716-EE-VQP-32 / EE_QW_2_20070628