Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid

Re: Daily Log Audit (regex issue)

by jlongino (Parson)
on Oct 22, 2002 at 04:20 UTC ( #206977=note: print w/replies, xml ) Need Help??

in reply to Daily Log Audit (regex issue)

I would consider a brute force method to begin with and then refactor from there. Here's where I'd start:

First, you need to decide how to start the processing:

  • Begin at a point where all partitions are quiet?
  • Accept the fact that some jobs may have already started when you begin and either ignore them or check the RC and report accordingly (don't worry about start information)?

I'd parse the log file line by line and use a hash to keep the necessary info for the jobs in progress:

$jobs{$partition}{jobname} $jobs{$partition}{starttime} $jobs{$partition}{endtime} $jobs{$partition}{rc}

You examine each line and determine:

  • Is this the beginning of a new job? If so, store jobname, starttime.
  • Is this the end of a job? If so, have I recorded the start info for this job? if so, store endtime, rc, report, delete entry.
  • Ignore if neither of the above is true

Determine your strategy for what happens when you reach EOF:

  • Ignore the jobs started but not finished (or at least report that fact with the data you have)?
  • Choose an ending point in the log file where the partitions are all quiet?

The regexen used to parse each line should be fairly straight forward, you only have to read the file once, and you keep storage to a minimum. Would this be the most efficient way to do it? I don't know but as I said, during the coding process, you may gain some insight to try something different.


Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://206977]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (3)
As of 2021-10-24 13:21 GMT
Find Nodes?
    Voting Booth?
    My first memorable Perl project was:

    Results (89 votes). Check out past polls.