Script to zip users cmd history log files

[hedkandi]

This node falls below the community's threshold of quality. You may see it by logging in.

[Anonymous Monk]

Use username-hist-yyyy-mm, you'll thank me next year

[choroba]

In which aspect is your question related to Perl?

[hedkandi]

Hi there, never mind. I wanted to do a Perl Script of the commands I provided but had some help doing it in Bash script so that pretty much did the job.

#!/bin/bash
 
OLD_HIST_DIR="/var/log/user_history/old_logs"
HIST_DIR="/var/log/user_history"
 
MNTH_DEST_DIR="/var/log/user_history/old_logs/$(date +'%m')"
# date +'%m' gives number corresponding to the current month in 01,02,
+...11,12 fashion
 
mkdir -p "${MNTH_DEST_DIR}"  "${OLD_HIST_DIR}" # This will create the 
+directory if not present

cp -p ${HIST_DIR}/*history ${OLD_HIST_DIR}
 
gzip -9 ${OLD_HIST_DIR}/*history

mv ${OLD_HIST_DIR}/*.gz  ${MNTH_DEST_DIR}

@admins you may close this thread