Perl

NAVIGATION
CATEGORIES
REFERRENCE
LINKS
  • Script critique?

    0 answers - 1790 bytes - related search similar search Add To My Delicious Add To My Stumble Upon Add To My Google Mark Add To My Facebook Add To My Digg Add To My Reddit

    Jason Balicki wrote:
    Hello,
    I have several locations with a hardware VPN device and
    I've set them up to log to a central logging server.
    Some of the managers of these facilities would like to
    have a report showing who's using the VPN and when.
    I've written a script that does that. It works, but as
    I'm pretty new at Perl (this is only my second real
    life application) I'm sure it could be improved
    (significantly).
    Would some kind soul like to take a look at this
    script, make suggestions or otherwise completely
    destroy my ego? :)
    Thanks in advance to anyone who takes this up
    The script can be found at:
    How much data are you talking about at any point? A day, week, month or more? If less than a month, then using a hash to hold the key information and build the print information into the hash. Then you can sort or dice it up any way you want. Also by doing, you can come up with totals which can be placed at the beginning of the report whic can give your management a heads up depending on what they see. I do this all the time, it makes ofr nice report for management when they don't need to jump to the back of report to see the totals.
    Wags ;)
    And some fake (sanitized) data to run it against (you'll
    have to make changes to the script accordingly):
    (60k text file, some
    gunk has been pre-filtered)
    HINT: you can change $date in the script to get
    more hits.
    Thanks again,
    (K)
    This message contains information that is confidential
    and proprietary to FedEx Freight or its affiliates.
    It is intended only for the recipient named and for
    the express purpose(s) described therein.
    Any other use is prohibited.

Re: Script critique?


max 4000 letters.
Your nickname that display:
In order to stop the spam: 4 + 3 =
QUESTION ON "Perl"

EMSDN.COM