develooper Front page | perl.beginners | Postings from January 2002

A couple of questions!

Thread Next
Marvin Bonilla
January 5, 2002 10:47
A couple of questions!
Message ID:

I am really new programing perl scripts so, I read this list and I
realized that you know a lot about this stuff, well I want to make a
report where the final information we want to have depend of the hour it
was saved. The log file is lineal and its look like this:

Thu Nov  1 00:00:01 2001
        NAS-IP-Address =
        NAS-Port = 105
        NAS-Port-Type = Async
        User-Name = "Pproagua"
        Called-Station-Id = "2447000"
        Calling-Station-Id = "2892646"
        Acct-Status-Type = Stop
        Acct-Authentic = RADIUS
        Service-Type = Framed-User
        Acct-Session-Id = "0000E366"
        Framed-Protocol = PPP
        Framed-IP-Address =
        Acct-Terminate-Cause = User-Request
        Acct-Input-Octets = 1295352
        Acct-Output-Octets = 9812455
        Acct-Input-Packets = 18832
        Acct-Output-Packets = 23384
        Acct-Session-Time = 5275
        Acct-Delay-Time = 0
        NASGroupDigital = True
        IBW-Realm =
        Timestamp = 1004594401

The first line has the hour that this report was origined, the information
that I need is the line where appears "Acct-Session-Time = 5275"
but just from the 08:00 to 19:00, and them sum the numerical value.

I can get the hour (with while and split functions) but once I get
that I do not how to read their "Acct-Session-Time" belong to this hour.

So I need a cue that tell me with which function I can read any numbers of
line before o after a match is found or some idea about how I can do that.

The other question is "Do Someone know some URL I can get excercises to
practice perl programing since beginners level??

Thanks for your sure answers
Marvin B.

Thread Next Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About