Beefy Boxes and Bandwidth Generously Provided by pair Networks
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

There is a space issue in the prod server, its require to delete the old log lines i.e. the log lines which tracked on 2011 and past from all the applications event-logs

by perladdict (Chaplain)
on Feb 12, 2013 at 18:35 UTC ( [id://1018424]=perlquestion: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    $ cd /rms
    $ ls
    ...
    406       784       797       911       GENEOS    test.tar
    450       785       798       912       home      transfer
    490       786       799       915       KL        utils
    
  2. or download this
    $ cd  /rms/799/cool/data/TMP
    -rw-rw-r--   1 coolvas1 coolvas1    4325 Jan  4 15:04 COOL-event-log.L
    +BOX
    -rw-rw----   1 coole3   coole3       297 Jan 25 03:01 COOL-event-log.E
    +3ASIA
    -rw-rw-r--   1 coolbrz  coolbrz    20526 Feb 12 05:27 COOL-event-log.B
    +REEZE
    -rw-rw----   1 coolmint coolmint  307297 Feb 12 08:30 COOL-event-log.M
    +INT
    
  3. or download this
     >coolmint started sh-MINTlink on 24/08/2012 at 08:30:09
    INBC file found, Business date fetched is: 20120823
    Received Parameters: APP: MINT, BRANCH: 799 and RECORDING DATE: 201208
    +23
    ...
    Validating file: CS-TWTPOUTC.20120828.1 CS-TWTPINBC.20120828.1 CS-TWTP
    +OREF.20120828.1 CS-TWTPIREF.20120828.1 CS-TWTPNAK.20120828.1
    Transfering file: CS-TWTPOUTC.20120828.1 CS-TWTPINBC.20120828.1 CS-TWT
    +POREF.20120828.1 CS-TWTPIREF.20120828.1 CS-TWTPNAK.20120828.1
    > started MINT recording for procdate 20120828 on 2012/08/29 at 08:30:
    +09
    
  4. or download this
    #!/usr/bin/perl -w
    @branches = `ls -ld /rms/???/cool/data/HOLDING | awk -F" " '{print $NF
    +}' | cut -f3 -d"/" | sort | uniq`;
    ...
               }
           }
        }
    
  5. or download this
    # To get the branches
    
    ...
                    done
                    
    done
    

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others avoiding work at the Monastery: (4)
As of 2024-04-25 16:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found