[comp.lang.perl] summarize "last" information ?

emv@math.lsa.umich.edu (Edward Vielmetti) (06/13/90)

(the line eater ate "comp.unix.admin", where this was supposed to go to)

Here's the situation.  I have a lab with a half dozen or so machines
in it, and I want to assess how heavily used the lab has been over
the past yea many weeks.  In particular, it would be useful to know
what hours it gets the most use and what fraction of the time all
of the systems have someone logged on to the console.

each machine's "last console" looks something like this (names changed
to protect the innocent).  there are last logs for all the machines,
and the times are in sync.

grep      console                   Tue Jun 12 20:05   still logged in
grep      console                   Tue Jun 12 19:42 - 20:05  (00:22)
sed       console                   Tue Jun 12 17:21 - 17:54  (00:32)
perl      console                   Tue Jun 12 17:00 - 17:01  (00:00)
perl      console                   Tue Jun 12 16:23 - 17:00  (00:36)

I can think of a couple of reports I want to generate.  One would be a
simple strip chart showing # of people on the system over time.  I
guess once I have the data cooked that way I can figure out the rest,
like when all the seats are full, etc etc.

I'm sure that someone has done something like this before, either in 
tracking uucp usage or whatever.  any code would be welcome before
I strike off on my own.

--Ed

Edward Vielmetti, U of Michigan math dept <emv@math.lsa.umich.edu>